2135
با ساده ترین ، در عین حال پر کاربرد ترین کد در ویژوال بیسیک کار را شروع می کنیم و آن کد ifمی باشد و شکل کلی آن به صورت زیر می باشد.
if \then
Statements
Else
Statements
end if
به جای عبارت Statements کد های برنامه قرار می گیرد
مفهوم این کد بدین شرح است که ، اگر این شرط بر قرار بود سپس کارهایی را انجام دهد.بین if و then شرط مورد نظر قرار می گیرد.مثلا: if text1=12 then بدین مفهوم که اگر text1=12 سپس حال می خواهیم عملی را به انجام برسانیم مثلا بر روی فرم مقدار ورودی را چاپ کنیم پس برنامه کلی آن به شرح زیر می باشد.
if text1=12 then
print text1.text
end if
مفهوم برنامه:اگر text1=12 شد سپس مقدار text1 را چاپ کند و در نهایت حتما باید کدend ifرا وارد نماییم و اگر نه برنامه دچار خطای زمان اجرا می شود.
مثالی دیگر:
فرض می کنیم برنامه ای ساخته ایم که در صفحه اول آن رمز عبورهای متفاوتی را از کاربران دریافت نماید و در صورت درست بودن هر کدام از آن ها به صفحات مربوط به خود رجوع کند.
نکته:در ویژوال بیسیک و در قسمت لیست خصوصیات فرم ما می توانیم با کد form1.show فرم1 را به نمایش در آورده و با کد form1.hide فرم 1 را پنهان می کنیم.حالا از این کد در این مثال استفاده می کنیم و تغییر دیگری که در این مثال داده ایم این است که باید از شرط های تو در تو استفاده شود.فرض می کنیم که فرم 2 برای علی و فرم 3 برای مهران می باشد و کد علی 10 و کد مهران 20 باشد. قسمت سبز رنگ جزو کد برنامه نمی باشد و فقط برای توضیح آن قسمت نوشته شده است
If text1=10 thenاگر کد ورودی برابر 10 بود سپس
Form1.hide پنجره دریافت کد کاربری بسته شود
Form2.show پنجره علی نمایش داده شود
Elseاگر
If text1=20 thenاگر کد ورودی برابر 20 بود سپس
Form1.hide پنجره دریافت کد کاربری یسته شود
Form3.show پنجره مهران نمایش داده شود
End ifپایان
End ifپایان