Halaman

Rabu, 20 Oktober 2010

Mengganti Gambar Command Button Ketika Diklik

      Nah kita ketemu lagi dimodul ini...., disini sekarang kita membahas tentang bagaimana caranya membikin command button ketika di klik gambarnya, gambarnnya menjadi ganti.......

      Nah sebenernya ini adalah modul yang paling dikit diketiknnya hehehehehehehe....:), masalahnnya waktu........., untuk membuat form ini seperti biasa bikin form seperti disamping.......,sudah? kalau sudah seperti biasa masukan coding yang di bawah ini di command buttonnya............ :

Private Sub Command1_Click()
Command1.Picture = LoadPicture("D:\Buku VB\Buku 4\iconsComputer\004.ico")
Command1.Caption = "Simpan"
End Sub

Ganti directorynya sama directory gambar/icon kamu......,
Coba run dan lihatlah hasilnya......, kalau orang yang kreatif pasti modul ini sangat berharga.........., (walaupun simpel), karena dengan dikembangkan ini sangat berguna sekali....
Terima Kasih telah membaca modul ini, seperti biasa salam perpisahannya adalah:
Sampai Jumpa Lagi Di Modul Berikutnya....
Selamat Mencoba...
Hidup Programmer!!!!!!!!!!

0 komentar:

Posting Komentar