Imports System.Console
Module Module1
Sub Main()
Dim i As Integer
For i = 1 To 10 Step 4
If i >= 8 Then GoTo 100
Write("Kamu ")
Next i
100:
Write("Kesini")
ReadLine()
End Sub
End Module
Hasil nya :Selamat Mencoba ^ ^..
Bila belum paham dengan menggunakan aplikasi Console vb silahkan lihat di : Dasar aplikasi vb Console

Tidak ada komentar :
Posting Komentar