Siapkan :
- 1 Form yang ingin diubah warna backgroundnya.
+++++> Name = warna
+++++> Caption = (terserah Anda)
- 1 CommandButton
+++++> Name = ganti
+++++> Caption = ganti
- 3 TextBox
==>TextBox1 :
+++++> Name = red
+++++> Text = red
==>TextBox2 :
+++++> Name = green
+++++> Text = green
==>TextBox3 :
+++++> Name = blue
+++++> Text = blue
- 2 OptionButton
==>Option1 :
+++++> Name = sembunyikan
+++++> Caption = sembunyikan
==>Option2 :
+++++> Name = tampilkan
+++++> Caption = tampilkan
Atur seperti gambar dibawah ini :

Setelah itu ketik Coding dibawah ini :
Private Sub ganti_Click()
‘menggunakan fungsi RGB pada VB
Form1.BackColor = RGB(red.Text, green.Text, blue.Text)
End Sub
Private Sub sembunyikan_Click()
‘menyembunyikan semua item
ganti.Visible = False
red.Visible = False
green.Visible = False
blue.Visible = False
End Sub
Private Sub tampilkan_Click()
‘menampilkan semua item
ganti.Visible = True
red.Visible = True
green.Visible = True
blue.Visible = True
End Sub
Setelah itu jalankan program dengan menekan F5.
Misal : Isi red dengan angka = 255
Isi green dengan angka = 255
Isi blue dengan angka = 255
Kemudian klik tombol ganti.
Hasilnya, background VB Anda akan berubah menjadi warna putih.
Untuk mengenai kode warna tersebut. Anda bisa cari di blog ini.


Tidak ada komentar:
Posting Komentar