کمک فوری برای حل تمرین فصل دوم ویژال بیسیک جعفر نژاد قمی بصورت کامل

[Persianhb]

[modirmasool]

دوست عزیز یکم کم لطفی میکنین! شما باید خودتون شروع کنین تا بچه ها هم کمکتون کنن. برای شروع برنامه اولی رو میشه اینطوری نوشت:

یه دکمه بذارین و اینا رو توش بنویسین:

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

حالا ببینم دیگه چیکار میکنین ها! مثلا همین برنامه رو گسترشش بدین چون ایرادهای زیادی میشه ازش گرفت،مثلا کاربر ممکنه بجای عدد،حرف وارد کنه!

[amirxbest]

این جواب 2 فقط یه دکمه درست کن و کد رو کپی کن:

  محتوای مخفی: number 2 

Private Sub Command1_Click()
Dim s As Single
a = InputBox("ghaede")
b = InputBox("ertefae")
s = (a * b) / 2
Print "s =" & s
End Sub

این جواب 4 فقط یه دکمه درست کن و کد رو کپی کن:

  محتوای مخفی: number 4 

Private Sub Command1_Click()
Dim result As Single
a = InputBox("kg")
result = a * 1000
Print a & "kg=" & result & " gr"
End Sub