Pada vb6 untuk merubah warna background dan font sangatlah mudah cukup buatlah form dengan beberapa Command atau label kemudiann ganti text dimasing-masing Command atau label dengan nama warna seperti merah, kuning, hijau, biru dan hitam seperti gambar dibawah ini:
Agar secara otomatis ketika program dijalankan tulisan Merah, Kuning, Hijau menjadi huruf tebal dan miring klik 2 kali form dan masukkan kode dibawah ini:
Private Sub Form_Load()
Label1.FontBold = True
Label1.FontItalic = True
Label2.FontBold = True
Label2.FontItalic = True
Label3.FontBold = True
Label3.FontItalic = True
End Sub
Kemudian masukkan kode dibawah ini :
Private Sub Label1_Click()
Me.BackColor = &HFF&
End Sub
Private Sub Label2_Click()
Me.BackColor = &HFFFF&
End Sub
Private Sub Label3_Click()
Me.BackColor = &HFF00&
End Sub
Maka ketika program di run, otomatis tulisan Merah, Kuning, Hijau akan menjadi tebal dan miring, kemudian jika tulisan Merah diklik maka background program menjadi merah, ketika tulisan Kuning diklik maka background menjadi berwarna kuning begitu juga keyika tulisah hijau diklik maka background akan otomatis menjadi warna hijau.
0 comments:
Speak up your mind
Tell us what you're thinking... !