Membuat program Paint sederhana di Visual Basic

 

Pada form di atas terdapat 1picturebox,1 Text Box, 1 command dialog, dan 1 label. Pada properties masing-masing text box, dan label  diganti namenya menjadi txt_tebal dan lbl_color. Pada saat mengganti  name di properties cantumkan nama name sebelum diubah seperti Txt_tebal . pada label warna backcolor ganti dengan warna apa saja .
 
Pada kode di tuliskan seperti diatas.
Private sub picture1_mousedown ()  terjadi ketika pemakai melakukan penekanan tombol mouse pada kontrol, parameter yang dapat digunakan adalah Button (1 – Tombol kiri, 2 – Tombokanan),  Shift (1 – Shift, 2 – Ctrl, 3 – Alt), X (posisi kolom pointer), Y (posisi baris pointer).
Private sub picture1_mousemove ()  terjadi ketika pamakai mengerakan mouse pada kontrol, parameter yang dapat digunakan adalah Button (1 – Tombol kiri, 2 – Tombol kanan),  Shift (1 – Shift, 2 – Ctrl, 3 – Alt), X (posisi kolom pointer), Y (posisi baris pointer).
Private sub txt_tebal_keypress () terjadi pada saat menginput huruf tidak akan terbaca, yang terbaca hanyalah angka. Keypress digunakan untuk memanipulasi keyAscii.
Output
ketika di klik run maka tampilan seperti diatas. Fungsi label di dalam program ini pada saat di klik akan memunculkan warna dan pada saat warna dipilih warna putih pada label akan berganti wana sesuai yang dipilih. Text box berfungsi ketika di masukkan angka akan menjadi tebal garis pada saat picture box di arahkan pointer.
Selamat mencoba…..!!!!!

Tinggalkan Balasan

Isikan data di bawah atau klik salah satu ikon untuk log in:

Logo WordPress.com

You are commenting using your WordPress.com account. Logout / Ubah )

Gambar Twitter

You are commenting using your Twitter account. Logout / Ubah )

Foto Facebook

You are commenting using your Facebook account. Logout / Ubah )

Foto Google+

You are commenting using your Google+ account. Logout / Ubah )

Connecting to %s