برنامه ای بنویسید که دو عدد گرفته مجموع آنها را چاپ نماید

برنامه ای بنویسید که دو عدد گرفته مجموع آنها را چاپ نماید

ابتدا الگوریتم:

1.     شروع

2.     A , B را بخوان

3.     SUM = A + B

4.     SUM را چاپ کن

5.     پایان

مراحل تبدیل الگوریتم به برنامه:

1)شروع    :

الف)طراحی رابط کاربر(رابط کاربر فرمی است شامل چند کنترل که کاربر نهایی از طریق آن با برنامه ما ارتباط برقرار می کند.)

برای برنامه فوق رابط کاربری به شکل زیر که فقط  شامل فقط یک کنترل Command Button  می باشد کافی است.

ب)تنظیم خصوصیات کنترل ها به صورت جدول زیر:

نام کنترل	نام خصوصیت	مقدار
Form	Name	frmSum
	Caption	جمع دو عدد
Command Button	Name	cmdRun
	Caption	Run

 

ج) روی کنترل Command Button دوبار کلیک(Double Click)  می کنیم تا وارد پنجره کد نویسی شویم.

د) متغیر هایی که در الگوریتم استفاده کرده ایم را به شکل زیر تعریف می کنیم.

Private Sub cmdRun_Click()

Dim intA as integer , intB as integer , intSum as integer

 

End Sub

*****تمام مراحل (الف) تا (د)  فقط مربوط به مرحله شروع الگوریم است. باقی مراحل را بصورت زیر می نویسیم.

Private Sub cmdRun_Click()

   Dim intA as integer , intB as integer , intSum as integer

.2-     A , B را بخوان............................................................................................................................................. intA=InputBox(“Enter a number”)   

     intB=InputBox(“Enter a number”)

3-   SUM = A + B intSum = intA + intB   ...........................................................................................................     

4-.     SUM را چاپ کن......................................................................................................................................................................................... Print intSum   

5-     پایان        ................................................................................................................................................................................................................End Sub

توجه1: تابع InputBox  رشته ای که توسط کاربر وارد می شود را بر می گرداند که ما آنرا در متغیر قرار می دهیم.

توجه2: به دلیل اینکه متغیرهای ما از نوع صحیح می باشند عمل تبدیل (رشته به عدد) به طور خودکار انجام می شود.فقط داده ورودی باید عدد باشد.