سلام علیکم !
ببخشید فقط یه سوال ! مشکل این کد چیه ؟
کد:برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
سلام علیکم !
ببخشید فقط یه سوال ! مشکل این کد چیه ؟
کد:برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
سلام دوست عزيز بهتره كه بگي چه برنامه اي مي خواهيد ؟
در ضمن درست كد هم اينه
private sub command1_click()
dim a, b, c as integer
a = val(text1.text)
b = val(text2.text)
c = val(text3.text)
if b / 30 and a * b = c then
a = ""
b = ""
c = ""
end if
end sub
با توجه به گفته های aaaammmm87 باید اضافه کنم که:
با این روشی که شما متغیرهاتونو تعریف کردین فقط c از نوع integer تعریف میشه و دوتای دیگه همون variant میمونن. بهتر اینجوری تعریف کنین.dim a, b, c as integer
Dim a as Integer ,b as Integer ,c as Integer
ببینین برنامه ی مهمی نمی خوام !
می خوام این برنامه اولا b رو تقسیم بر 30 بکنه ! بعد a رو ضربدر b بکنه و توی c بنویسه !
قبلش هم هر سه تکست باکس رو سفید کنه !
قبلا خودم تا حدودی بلد بودم ! ولی الان با متغیر ها این مشکل رو پیدا کردم !
اینم اضافه کنم که
تا جایی که یادمه ! اول این کد ها برای متغیر ها یه کدی اضافه می کردیم که در مورد همه ی کد ها کار بکنه که در مورد متغیر ها به کار می ره !کد:برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید![]()
سلام
اگه منظورت در مورد نوع تعریف متغیر هاست که من تا الان همچین چیزی ندیدم.تا جایی که یادمه ! اول این کد ها برای متغیر ها یه کدی اضافه می کردیم که در مورد همه ی کد ها کار بکنه که در مورد متغیر ها به کار می ره !
در مورد برنامه با توضیحاتی که خودت دادی اینجوری میشه:
private sub command1_click()
dim a as integer, b as integer, c as integer
a = text1.text
b = text2.text
c = text3.text
text1="": Text2="": Text3=""
b=b\30
c=a*b
end sub
متاسفانه یکی از مشکلاتی که اکثر بچه ها و حتی معلم ها هم دارن این ه که متغیر ها رو به شکل زیر تعریف میکنن :
Dim a, b, c As Integer
در صورتی که اشتباهه ... و در نوشتن کد ممکنه خطا پیش بیاد.
دلیلش رو هم دوستمون توضیح داد دیگه لازم نیست من بگم.
ولی کد مشکل پیدا می کنه ! اینم برنامم !
کد:برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
هم اکنون 1 کاربر در حال مشاهده این تاپیک میباشد. (0 کاربر عضو شده و 1 مهمان)