انجمن کدستانMoisrex

در تاپیک گذشته با چند دستور ویژوال بیسیک آشنا شدید. اکنون در قسمت پنجم تاپیک آموزش برنامه نویسی ویژوال بیسیک ۶ شما را با یک مثال آشنا می کنم.

می خواهیم یک برنامه ای بنویسیم که دو عدد را از کاربر بگیرید و حاصل ضرب آن ها را نمایش دهد.

اشیاء مورد احتیاج : سه کادر متن ( TextBox ) – دو CommandButton

موارد بالا را به فرم اضافه کرده و در محل مناسب قرار دهید.

مشخصه Name کادر های متن به شرح زیر است :

Text1 و Text2 و Text3 و مشخصه Name ، command ها به ترتیب command1 و command2 می باشد.

محتویات پیش فرض کادر های متن را با تغییر دادن مشخصه ی Text پاک کنید و یا از دستورات زیر استفاده کنید :

Tex1 = “”

Text2 = “”

Text3 = “”

که البته این دستورات باید به دو دستور پیش فرض زیر نوشته شوند :

Private Sub Form_Load()

End sub

مشخصه ی Caption دکمه های انتخاب ( Command ها ) را به ترتیب به Run و Exit و یا هر نام دلخواه تغییر دهید. مثلاً اجرا برنامه و خروج و یا …

کد مربوط به دکمه Exit را که در درس قبل آموختید بنویسید . ( روی دکمه Exit دو بار کلیک کنید و کد End را بین دو دستور پیش فرض بنویسید . باز هم تاکید می کنم کلیه دستور ها بین دو دستور پیش فرض باید نوشته شود . البته در آینده دستورات اندکی بین این دو دستور نوشته نمی شوند که مفصلاً در آینده در این باره شرح خواهم داد) .

روی Run دوبار کلیک کنید ( منظورم دکمه انتخابی است که خودتان ساخته اید) و در پنجره مربوطه بین دو دستور پیش فرض دستورات زیر را بنویسید :

Text3.Text = Val(Text2.Text * Text1.Text(

دستور Val باعث می شود که ویژوال بیسیک بفمهد که با عدد سرو کار دارد.

اگر Val را ننویسید حاصل ضرب ۲*۲ عدد ۲۲ را نشان می دهد که این غلط است.

برنامه را با کلید F5 اجرا کنید و خودتان عملکرد برنامه را ببینید.

منتظر تاپیک من در همین انجمن بعدی من باشید.

در صورتی که به مشکل برخوردید و یا هر سوالی داشتید در پ.خ مطرح نمائید.