View Full Version : سوال: select case
amaali20
شنبه 25 مهر 1388, 08:19 صبح
سلام
من از روش select case در برنامه استفاده کرده ام
زمانیکه مثلا می نویسم case 345 TO 400 دستورات برای اعداد دو رقمی مثل 35 و 36و 37و ... هم عمل می کند
لطفا راهنمایی کنید
mostafa_bahar
شنبه 25 مهر 1388, 09:45 صبح
از ifelse استفاده کن
amaali20
شنبه 25 مهر 1388, 10:25 صبح
ببخشید ifelse را کجا باید نوشت
Select Case Textss.Text
Case 18
TxtSS(0).Text = 11
Case 19
TxtSS(0).Text = 14
Case 200 To 345
TxtSS(0).Text = 34
End Select
xxxxx_xxxxx
شنبه 25 مهر 1388, 15:57 عصر
شما باید عبارت مقابل Select Case را به درستی وارد کنید. اگر منظورتان محتوای عددی آن است باید Val آن را برگردانید.
این مشکل به دلیل این که محتوای عبارت مقابل Select Case از نوع رشته ای است رخ میدهد.
بنابراین یک Select Case صحیح به شکل زیر است:
Select Case Val(Text1.Text)
Case 345 To 400
MsgBox "...."
End Select
موفق باشید/
vBulletin® v4.2.5, Copyright ©2000-1403, Jelsoft Enterprises Ltd.