OK setelah sebelumnya kita belajar membuka file text sekarang kita akan belajar membuaka
file picture/image ,OK gan langsung praktek :
Buat 1picturebox untuk menampilkan imagenya ,1 textbox untuk nama file image yang akan di buka
1commandbuton untuk menampilkan
lalu masukan code berikut ini
Lalu simpan
Kelemahan :
hanya dapat menampiakan gambar Bitmaps,gif,jpeg,metafiles,icons
PNG DLL gg bisa
file picture/image ,OK gan langsung praktek :
Buat 1picturebox untuk menampilkan imagenya ,1 textbox untuk nama file image yang akan di buka
1commandbuton untuk menampilkan
lalu masukan code berikut ini
Private Sub Command1_Click()
namafile = App.Path & "\" & Trim(Text1)
Picture1.Picture = LoadPicture(namafile)
End Sub
Lalu simpan
Kelemahan :
hanya dapat menampiakan gambar Bitmaps,gif,jpeg,metafiles,icons
PNG DLL gg bisa
No comments:
Post a Comment