Posted inGambas

Menampilkan Gambar dengan Gambas

Buat design aplikasi yang akan kita buat seperti gambar dibawah ini Komponen yang digunakan Button dan PictureBox. Ubah text pada button menjadi Pilih, lalu klik dua kali pada tombol pilih tersebut, tambahkan script dibawah ini Dim pic As Picture dialog.Path = "/home/tommy/Pictures" If dialog.OpenFile() Then Return pic = New Picture pic.Load(dialog.Path) PictureBox1.Picture = Picture[Dialog.Path] /home/tommy/Pictures […]