سوال در مورد دستور if

[gazereng]

سلام،می خوام یک دستور ساده if با چندتا متغیر بکار ببرم فرضا:

If Text1 = "ali" Then
Caption = "ok"
End If

If Text1 = "reza" Then
Caption = "ok"
End If

If Text1 = "iman" Then
Caption = "ok"
End If

اگر تکست1 مساوی iman و یا reza و یا ali بود caption="ok" باشه...
برای کوتاه کردن برنامم می تونم چکار کنم؟

[milad3em]

if text1="ali" or text1="reza" or text1="iman" then
caption="ok"
else
caption="cancel"
end if

[سپهر-111]

سلام
از دستور select / case میتونی استفاده کنی

[vbhamed]

سلام
اين يك راه ديگه
Caption = IIf(text1 = "ali" Or text1 = "reza" Or text1 = "iman", "ok", "")