Tugas 3 Perulangan

Modifikasi Program Tugas Sebelumnya (Tugas 2) menjadi seperti berikut ini:

Kondisi yg Harus Dipenuhi:

dari program sebelumnya di Tugas Pemrograman 2 belum ada buttom "Isi Data"
mulanya kita bikin terlebih dahulu Buttom IsiData Tersebut
beri name() : btisi *initialisasi bebas
text : "Isi Data "

kemudian doble klik untuk menuliskan code di Isi Data
tuliskan code untuk perulangan menggunakan "For
(perintah soal No.2)

Dim Control As Windows.Forms.Control >>>>> (Memesan Variable)
        For Each Control In Me.Controls
            Control.Enabled = True
        Next
        For Each Control In Me.Controls
            btisi.Enabled = False
        Next
------------
output hasil : tombol Isi data tidak aktif setelah di Klik

kemudian tambahkan juga perulangan untuk Bt. Clear
(perintah soal No.3)
Dim Control As Windows.Forms.Control
        For Each Control In Me.Controls
            Control.Enabled = False
            btisidata.Enabled = True
            bttutup.Enabled = True
        Next
----------
outputnya : saat di Klik tombol Clear maka tampilan seperti saat Form dijalankan

untuk menjalankan (perintah No.1 ) maka perlu dituliskan code berikut di Form 1

Dim Control As Windows.Forms.Control
        For Each Control In Me.Controls
            Control.Enabled = False
                btisidata.Enabled = True
                bttutup.Enabled = True

-------------

jadi saat form dijalankan Bt IsiData dan bt Tutup aktif, sedangkan Clear tidak aktif

LATIHAN 2.........

Hasil output saat form dijalankan: (1)

angka acak....

Setelah tombol Acak di Klik maka angka akan mengacak lg

capture (2)

Dan setelah angka dapat di urutkan oleh user maka akan Muncul window "Selamat Anda Berhasil"

capture poin 3

untuk coding dapat di lihat di SINI

Demikian yg dapat saya sampaikan, Terimakasih,