Tuesday, October 21, 2014

CONTOH PENGGUNAAN PERULANGAN FOR EACH PADA VB.NET 2008

1. Buat project baru.
2. Desain form seperti pada gambar di bawah ini :


3. Tambahkan kontrol ke form seperti pada gambar diatas dan atur propertinya seperti tabel berikut:


Object
Properties
Nilai
Form5
Name
Text
Form5
Perulangan FOR EACH … IN…NEXT
Button1
Name
Text
Button1
Button1
Button2
Name
Text
Button2
Button2
Button3
Name
Text
Proses
Button3



4. Klik ganda pada Proses, kemudian ketikkan kode program berikut ini :


 Private Sub Proses_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Proses.Click
       For Each ctrl In Controls
            ctrl.Text = "Tombol"
        Next
End Sub

5.  Jalankan aplikasi dengan menekan tombol F5 (di keyboard), atau melalui ikon Start Debugging di
    toolbar, atau melalui menu Debug > Start Debuging.
6. Simpan project anda.

Hasilnya dapat dilihat pada gambar di bawah ini :


Untuk mendownload projectnya kllik disini




No comments:

Post a Comment