در درس گذشته با چند دستور ویژوال بیسیک آشنا شدید. اکنون در قسمت پنجم مقالات آموزش برنامه نویسی ویژوال بیسیک ۶ شما را با یک مثال آشنا می کنم.
می خواهیم یک برنامه ای بنویسیم که دو عدد را از کاربر بگیرید و حاصل ضرب آن ها را نمایش دهد.
اشیاء مورد احتیاج : سه کادر متن ( 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 اجرا کنید و خودتان عملکرد برنامه را ببینید.
نظرات شما عزیزان: