شرط گذاری بین دو عدد

[berayan 90]

سلام

بنده میخوام شماره های بین 2 عدد رو بررسی کنم اما هنگام اجرا نرم افزار ارور میده و به کد ایراد می گیره لطف راهنمایی کنید .

if dim1 =1 to 10 then

msgbox=("ok","ok")

end if

به TO ایراد میگیره

[نیما قبادی 246]

اگه میخوای با حلقه کار کنی اینجوری

For i = 0 To 10

Msgbox(i,"ok")

Next

میاد عددهای بین 0 تا 10 رو نشون میده

[berayan 90]

سلام

نه می خوام خارج از حلقه بررسی کنم در زبان vb6 امکانش هست اما انگار تو b4a عمل نمی کنه .

دقیقا مثل کدی که خودم نوشتم .

if dim1 =1 to 10 then

msgbox=("ok","ok")

end if

[نیما قبادی 246]

vb6 یکم با بیسیک فاصله داره خوب شما هم گفتی میخوام شماره های بین 2 عدد رو بررسی کنم پس او حلقه چیکار میکنه؟

منظورتون رو درست متوجه نشدم؟*dntknow*

[مهدی ایزدی 9,203]

فکر نکنم همچین قابلیتی توی بیسیک4اندروید وجود داشته باشه. بنده ندیدم.

مگر اینکه با روش های دیگه کار کنید. یعنی داخل خود حقله شرط رو قرار بدید.

[jeqele 563]

اگه عدد بین 1 تا 10 باشه این کد OK نشون میده.

با کدی که نوشتی احتمالا همینو بخوای.

If a > 1 AND a < 10 Then
       Msgbox("ok", "ok")
   End If