سوال در مورد خروج از روتین یا تابع

[arsanhacker]

سلام من یه سوال داشتم که به صورت مثال براتون توضیح می دم.

من می خوام تعریف کنم که مثلا اگه "" = Text1.text بود یه Msgbox باز بشه و ارور بده بعد دیگه عملیات بعدی صورت نگیره

مثل

If text1.text = "" then

msgbox " Error" , vbCritical

end if

........

من اینجا می خوام که دیگه این 3 نقطه انجام نشه.

عنوان درست انتخاب کنید

[Di Di]

می تونی از Exit Sub استفاده کنی.

[mbza11]

سلام.
همونطوري که دوست عزيز Di Di گفتن مي توني از ExitSub استفاده کني.
اينم کد اصلاح شده شما:

کد:

If text1.text = "" then

msgbox " Error" , vbCritical

ExitSub

end if

[yeketaz]

البته در صورتی که اون قسمت از برنامه که توش این کدو می نویسیم از نوع Sub باشه

و اگر از نوع Function بود باید از ExitFunction استفاده کنی