Pemrograman Visual:Perulangan: Difference between revisions

@@ Line 171: / Line 171: @@
 * Klik ganda pada Proses, kemudian ketikkan kode program berikut ini:
+<syntaxhighlight lang="bash">
+Dim X%
+X = TxtAngka.Text
+Do
+    X = X Mod 2
+    If X = 0 Then
+        MsgBox("Bilangan Genap")
+        Exit Do
+    ElseIf X = 1 Then
+        MsgBox("Bilangan Ganjil")
+        Exit Do
+    End If
+Loop While Not X
+</syntaxhighlight>
+*Jalankan aplikasi dengan menekan tombol F5 (di keyboard), atau melalui ikon Start Debugging di toolbar, atau melalui menu Debug > Start Debuging.
+*Simpan aplikasi Anda.
+===Perulangan FOR EACH … IN…NEXT===
+*Tambahkan Form baru, dengan nama Form5.
+*Desain Tampilan form seperti gambar berikut ini :
+*Tambahkan kontrol ke form seperti pada gambar diatas dan atur propertinya seperti tabel berikut: