Contact: aviboots(AT)netvision.net.il
40,762 questions
53,137 answers
573 users
Imports System Public Class Test Public Shared Sub test() For i As Integer = 0 To 10 Console.WriteLine(i) If i = 4 Then Exit Sub End If Next End Sub Public Shared Sub Main() test() End Sub End Class ' Run: ' ' 0 ' 1 ' 2 ' 3 ' 4