Menampilkan Gambar/Image di Dalam Form

Menampilkan Gambar/Image di Dalam Form VB - Kali ini tip dan trik akan membahas bagaimana Cara Menampilkan Gambar/Image di Dalam Form VB. Tujuan dari menamapilkan gambar di form adalah untuk memperindah tampilan agar tampak lebih menarik lagi atau bisa juga bertujuan untuk kebutuhan tertentu yang perlu menampilkan gambar atau image.

Untuk menampilkan Gambar banyak cara yang dilakukan di form VB diantaranya menggunakan Kotak Image, PictureBox dan atau langsung ke dalam form itu sendiri.Untuk itu mari kita bahas satu persatu.

A. Menampilkan Gambar/Image dengan PictureBox

1.  Letakan di form 1 Picturebox

2. Pada Properties PictureBox cari Picture, kemudian tekan tanda [...] untuk mencari Gambar/Image

3. Cari AutoSize pada Propeties atur menjadi True bila ingin gambar menyesuaikan lebar PictureBox


B. Menampilkan Gambar/Image dengan Kotak Image

1. Letakan di form 1 Image
2. Pada Properties Image cari Picture, kemudian tekan tanda [...] untuk mencari Gambar/Image
3. Cari Strech pada Propeties kemudian atur menjadi True bila ingin gambar menyesuaikan lebar Image

C. Menampilkan Gambar/Image di Seluruh Form Secara Full

1. Klik Form yang kan ditampilkan gambar
2. Pada Properties Form cari Picture, kemudian tekan tanda [...] untuk mencari Gambar/Image
3. Apabila Anda ingin menampilkan Gambar/Image sesuai lebar Form, maka ketik kode dibawah       ini :

Option Explicit
Dim myPic As PictureBox
Dim stdPic As New StdPicture

Sub RedrawScreen()
myPic.Width = Me.ScaleWidth
myPic.Height = Me.ScaleHeight
myPic.BorderStyle = 0
myPic.Visible = False
myPic.AutoRedraw = True
myPic.PaintPicture stdPic, 0, 0, myPic.Width, myPic.Height
Set Me.Picture = myPic.Image
End Sub

Private Sub Form_Resize()
Call RedrawScreen
End Sub

Private Sub Form_Load()
Set myPic = Me.Controls.Add("VB.PictureBox", "myPic")
Set stdPic = Me.Picture
Call RedrawScreen
End Sub

Setelah program dijalankan maka form Anda akan mempunyai Background image/gambar secara full memenuhi form.

Demikian tip Cara Menampilkan Gambar/Image di Dalam Form VB. Sekian semoga bermanfaat,selamat mencoba semoga berhasil

No comments: