دستورات پایه ای برای برنامه نویسی

واضح آرشیو وب فارسی:سایت دانلود رایگان:

1-دستور شرطی if
در برنامه نويسی مواردی پیش می آيد که بخواهيم دستور یا دستوراتی، هنگامی که شرط خاصی برقرار است، توسط برنامه به اجرا در آيد. اين مورد در زندگی روزمره نيز ديده می شود؛ به عنوان مثال " اگر فردا باران نيايد، من به کوه خواهم رفت." شرط مورد نظر نيامدن باران است و عملی که قرار است انجام شود رفتن به کوه می باشد.در برنامه نویسی ویژوال بیسیک این شرط به صورت زیر نوشته می شود

If شرط مورد نظر Then دستور مورد نظر

حالا مثال خودمون رو روی این دستور پیاده می کنیم

If فردا باران نیاید Then من به کوه خواهم رفت

دستور if در ویژوال بیسیک به دو صورت نوشته میشه

الف- معمولی: صورت معمولی دستور if مثل مثالی هست که قبلا زدیم.در این صورت از دستور فقط یک کار برای ما انجام می شود.

If شرط مورد نظر Then دستور مورد نظر

ب- در این حالت ما می توانیم یک یا چند دستور را اجرا کنیم.باید توجه داشت که در پایان دستور ها باید کلمه End if را برای اتمام کار بنویسیم در غیر این صورت برنامه پیغام خطا می دهد.

If شرط مورد نظر Then

دستور شماره1

دستور شماره 2

دستور شماره3

دستور شماره......

End if

2-دستور شرطی If & Else
گاهی اوقات نياز داريم که در صورت برقرار بودن شرط خاصی يک سری دستورات اجرا و در صورت برقرار نبودن آن شرط دسته ای ديگر از دستورات اجرا گردند. به عنوان مثال اگر فردا باران بيايد من به کوه نمی روم در غير اين صورت من به کوه خواهم رفت.

If شرط مورد نظر Then

دستور اول

Else

دستور دوم

End if

حالا مثال رو روی این دستور پیاده می کنیم.

If فردا باران بیاید Then

من به کوه نمی روم

Else

من به کوه می روم

End if

حالا ویژوال بیسیک رو اجرا کنید و از پنجره ی باز شده New Project رو انتخاب کنید تا یک پروژه ی جدید باز شود.

وقتی پروژه ی جدید باز شد از طریق منوی سمت چپ یک Command Button به فرمتون اضافه کنید.

روی command button دو بار کلیک کنید تا پنجره ی کد نویسی باز بشه.

در این قسمت ما می خواهیم دستور if را برسی کنیم پس کد نویسی را شروع می کنیم.در پنجره ی کدنویسی هر چقدر متن هست رو پاک کنید و به جای اون این کدهارو بزارید.

Private Sub Command1_Click()

If 50 < 100 Then Beep

End Sub

خط اول و آخر مربوط به اینه که مشخص میکنه در چه جایی این شرط بررسی بشه که ما به برنامه گفتیم در موقعی که بر روی command button کلیک میشه این شرط رو بررسی کن.

خط دوم هم به برنامه میگه اگر عدد 50 کمتر از 100 بود در اون صورت بوق بزن(Beep)

حالا می خواهیم دستور If &Else را بررسی کنیم.

مانند قبل یک پروژه ی جدید باز کنید و در یک command Button به اون اضافه کنید.

با دوبل کلیک بر روی Command Button پنجره ی کدنویسی را باز کنید و کدهای داخل اون رو پاک کنید و این کدها رو بهش اضافه کنید.

Private Sub Command1_Click()

If 50 < 100 Then

MsgBox "50 kamtar az 100 ast"

Else

MsgBox "50 bishtar az 100 ast"

End If

End Sub

در خط اول و آخر مثل قبل به برنامه گفتیم که در چه جایی شرط بررسی بشه.

در خط دوم شرط مورد نظر رو نوشتیم"اگر عدد 50 کمتر از 100 بود" در اون صورت

در خط سوم دستوری رو نوشتیم که در ازای درست بودن شرط اجرا میشه پیغام "50 kamtar az 100 ast" رو نشون بده

خط چهارم هم کلمه ی Else یا "در غیر این صورت " رو نوشتیم

در خط پنجم هم دستوری رو نوشتیم که به ازای درست نبودن شرط اجرا میشه "پیغام 50 bishtar az 100 ast رو نشون بده"

در خط ششم هم پایان شرط رو اعلام کردیم

این صفحه را در گوگل محبوب کنید

[ارسال شده از: سایت دانلود رایگان]

[مشاهده در: www.freedownload.ir]

[تعداد بازديد از اين مطلب: 90]