Membuat Aplikasi Set All Text Button Label di VB.Net

Selasa, 15 Maret 2016

Sebelum anda membuat Aplikasi Set All Text Button Label di VB.Net anda harus sudah memahami dasar Visual Basic atau Visual Studio. Disini saya menggunakan Visual Studio 2010.

- Silahkan buat design seperti di atas.

- Taruh script di bawah ini untuk tombol "SET TEXT BUTTON DAN LABEL"

For Each ctr In Me.Controls
If TypeOf ctr Is TextBox Then
ctr.Text = txtbox.Text
End If
If TypeOf ctr Is Button Then
ctr.Text = txtbox.Text
End If
If TypeOf ctr Is Label Then
ctr.Text = txtbox.Text
End If

Maksud dari script diatas adalah :

For Each untuk memberi kontrol form yang sedang dibuka.

Jika typenya TextBox maka kontrol textnya TextBox menjadi "Chacita"

Jika typenya Button maka kontrol textnya Button menjadi "Chacita"

Jika typenya Label maka kontrol textnya Label menjadi "Chacita"

- Taruh script berikut di Button Keluar :