Sabtu, 02 Juni 2012

Cara membuat aplikasi image viewer by rizky

Filled under:

Cara membuat aplikasi image viewer by rizky
1)    1 .  Buka vb dan pilih standard EXE, lalu kilk open


2)      Lalu buat form dengan ketentuan :
1 frame,1 image,4 label,4 button,1 Drivelistbox, 1 Dirlistbox, 1 Filelistbox,1 combobox
2. Lihat gambar berikut agar lebih jelas :


3)      Jika sudah atur capitation seperti gambar di atas
4)      Atur  fungsi-fungsi tiap tombol pada form
Klik 2x pada Drivelistbox
Lalu isikan script berikut :

Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive
End Sub

Klik 2x pada Dirlistbox
Lalu isikan script berikut :

Private Sub Dir1_Change()
File1.Path = Dir1.Path
End Sub

Klik 2x pada Filelistbox
Lalu isikan script berikut :

Private Sub File1_Click()
foto = File1.Path + "\" + File1.FileName
Image1.Picture = LoadPicture(foto)
End Sub

Klik 2x pada Combobox
Lalu isikan script berikut :

Private Sub Combo1_Click()
File1.FileName = Combo1.Text
End Sub

Klik 2x pada Button1,button2,button3,button4
Lalu isikan script berikut :

Private Sub Command1_Click()
Image1.Picture = Nothing
End Sub

Private Sub Command2_Click()
Image1.Visible = False
End Sub

Private Sub Command3_Click()
Image1.Visible = True
End Sub

Private Sub Command4_Click()
End
End Sub

5)      3.Hasilnya akan seperti gambar berikut :


Tapi jika anda mau menambahi/merevisi/menghiasnya/mempercantik tampilannya bisa anda lakukan sendiri , seperti yang saya lakukan yaitu : lihat gambar berikut



Oke sekian info dari saya , trima kasih
Anda bisa mendownload aplikasi yang saya buat di link di bawah ini!!!

download juga file wordnya Disini 
pw : rizkyibnurrosyadi
Jangan lupa komentarya ya

1 komentar: