PDA

View Full Version : دستور on error resum next



magnalia
چهارشنبه 12 اردیبهشت 1386, 15:22 عصر
سلام .خسته نباشید.
دستور on error resum next چه کار می کنه؟

mpmsoft
چهارشنبه 12 اردیبهشت 1386, 15:25 عصر
باعث می شه در طول انجام اون Function یا Sub اگر خطایی در برنامه رخ بده دیگه Run Time Error نمی ده و از برنامه خارج نمی شه بلکه می ره خط بعدی و هیچ اهمیتی به خطا نمی ده و از برنامه بیرون هم نمی پره

magnalia
چهارشنبه 12 اردیبهشت 1386, 15:32 عصر
آقای آواتار دستت درد نکنه.

vb_nima
چهارشنبه 12 اردیبهشت 1386, 17:29 عصر
resume next مثل عمل کلید ignore می مونه .
resume مثل عمل کلید Retry.
Resume linelabel مثل Abort می مونه که linelabel برچسب خطی است که به آنجا برای خارج شدن از تابع یا رسیدگی به خطا انتقال می یابد

mehran8
چهارشنبه 12 اردیبهشت 1386, 19:29 عصر
بچه ها چه طوری می شه از دستور on error goto استفاده کرد ؟

__siavash__
چهارشنبه 12 اردیبهشت 1386, 20:44 عصر
به این صورت:
به عنوان مثال در رخداد فرم لود


Private Sub Form_Load()
On Error GoTo Error_A:
'کد های مورد نیاز



Exit Sub
Error_A:
If Err.Number <> 0 Then
MsgBox "Error (" & Err.Number & "): " & Err.Description, vbCritical
End If
End Sub

mehran8
پنج شنبه 13 اردیبهشت 1386, 07:06 صبح
Err اینجا چیه ؟

vb_nima
پنج شنبه 13 اردیبهشت 1386, 10:00 صبح
Err یک آبجکت است که اطلاعاتی در آن در مورد خطای رخ داده قرار میگیرد.
مثلا err.number شماره خطا را نشان میدهد. وبا این دستور می توان خود (متن) خطا را بدست آورد:


Error(err.numbe

S_VB.max
پنج شنبه 13 اردیبهشت 1386, 10:42 صبح
وبا این دستور می توان خود (متن) خطا را بدست آورد:





MsgBox Error(Err.Number)

or

MsgBox Err.Description

mehran8
پنج شنبه 13 اردیبهشت 1386, 17:41 عصر
ای ول دمتان گرم