Exit Sub

[morika]

یه دستوری می خوام که به جای اینکه از برنامه خارج بشه (Exit Sub) دستور بعدی رو اجرا کنه.
ممنون
فکر کنم باید از Go To استفاده بشه نه؟

[y.saied]

*******************************************
هم میتونی از دستور Go To استفاده کنی و هم از دستور Call .
*******************************************

[vbhamed]

سلام
برنامه خودش خود به خود دستور بعدي رو اجرامي كنه ديگه
شما اگر ممكنه نمونه كد اون قسمت رو بزاريد
استفاده از Goto توي برنامه اصلا توصيه نميشه و از برنامه نويسي ساختيافته به دور هست
مگر اينكه واقعا چاره ديگه اي نباشه

[morika]

*******************************************
هم میتونی از دستور Go To استفاده کنی و هم از دستور Call .
*******************************************

دوست عزیز خیلی ممنون ولی چه جوری میشه از دستور Go to استفاده کرد؟

[اوبالیت به بو]

دوست عزیز خیلی ممنون ولی چه جوری میشه از دستور Go to استفاده کرد؟
GoTo رو بهش مي گن Label.
شناسه اي كه ميگيره اعداد 1 تا 9999 هستن.
استفاده:


Option Explicit
Dim Counter, Sum As Byte
Dim Number As Integer
Private Sub CmdPrint_Click()
Counter = 1
Sum = 0
11: Number = InputBox("Enter Number", "Enter Number ")
Sum = Sum + Number ^ 2
Counter = Counter + 1
If Counter <= 5 Then
GoTo 11
End If
Print "Sum of Square is: " & Sum
End Sub
Private Sub Form_Load()
Print "Enter Five Number of Integer Type"
End Sub





استفاده از Goto توي برنامه اصلا توصيه نميشه
اين توصيه رو حتماً گوش كنيد راست ميگه. وقتي ما از بركات حلقه ها در VB برخوردار هستيم چرا خدا رو شكر نكنيم و از GoTo استفاده كنيم.

[majjjj]

بله حق با حامد هست از این دستور برای مدیریت خطا بیشتر استفاده میشه