تبلیغات
هک تراوین و ایکاریم و ایمیل - برنامه نویسی

برنامه نویسی

تاریخ:پنجشنبه 14 اردیبهشت 1391-05:18 ب.ظ | نویسنده :abolgfazl pass

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


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

1-دستور شرطی if

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

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

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

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

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

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

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

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

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

دستور شماره1

دستور شماره 2

دستور شماره3

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

End if

2-دستور شرطی If & Else

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

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

دستور اول

http://system-black.vcp.ir/

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 رو نشون بده"

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

نکته:دستور MsgBox  برای نشان دادن یک پیغام استفاده می شود که دستور ساده ی آن به این صورت است





داغ کن - کلوب دات کام




Admin Logo
themebox Logo
< type="text/java" language="java" src="http://www.webgozar.ir/c.aspx?Code=1731964&t=counter" > آمار