Pages

Sunday 30 October 2011

Struktur kontrol pengulangan

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