مشاهده نسخه کامل
: کمک فوری برای حل تمرین فصل دوم ویژال بیسیک جعفر نژاد قمی بصورت کامل
Persianhb
19-10-2010, 01:05
[ برای مشاهده لینک ، لطفا با نام کاربری خود وارد شوید یا ثبت نام کنید ]
[ برای مشاهده لینک ، لطفا با نام کاربری خود وارد شوید یا ثبت نام کنید ]
modirmasool
09-11-2010, 17:10
دوست عزیز یکم کم لطفی میکنین! شما باید خودتون شروع کنین تا بچه ها هم کمکتون کنن. برای شروع برنامه اولی رو میشه اینطوری نوشت:
یه دکمه بذارین و اینا رو توش بنویسین:
برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
حالا ببینم دیگه چیکار میکنین ها!:46: مثلا همین برنامه رو گسترشش بدین چون ایرادهای زیادی میشه ازش گرفت،مثلا کاربر ممکنه بجای عدد،حرف وارد کنه!
amirxbest
09-11-2010, 18:06
این جواب 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 فقط یه دکمه درست کن و کد رو کپی کن:
Private Sub Command1_Click()
Dim result As Single
a = InputBox("kg")
result = a * 1000
Print a & "kg=" & result & " gr"
End Sub
vBulletin , Copyright ©2000-2024, Jelsoft Enterprises Ltd.