Dim s = 3 start: Dim m = 1 print: Label1.Text = Label1.Text + "X " m = m + 1 If (m > s) Then s = s - 1 If (s <> 0) Then GoTo start End If Else GoTo print End If
a.d - i.s.s.w