Dalam
visual Basic terdapat beberapa jenis perulangan yaitu antara lain : For … Next, Do While … Loop, Do loop … Until
dan While … Wend.
Struktur
Penulisan (syntax)
For . . . Next
For
[parameter]=[nilai awal] to [nilai akhir]
<statement>
Next [parameter]
< parameter
> adalah variabel (tipe: integer) yang
digunakan untuk menyimpan angka pengulangan.
< nilai awal
> adalah nilai awal dari < parameter
>.
< nilai akhir
> adalah nilai akhir dari < parameter
>.
PRAKTIKUM
Desain form seperti pada gambar berikut
Ketik kode program berikut pada jendela kode editor
Private Sub Command1_Click()
Dim d As String
Dim e As Integer
Dim f As Integer
d = Text1.Text
e = Text2.Text
For f = 1 To e
List1.AddItem d
Combo1.AddItem d
Next f
End Sub
Private Sub Command2_Click()
List1.Clear
Combo1.Clear
End Sub
Jalankan program!
No comments:
Post a Comment