Rabu, 11 April 2012

Membuat HScrollBar dan VScrollBar


Kemarin saya telah mempostingkan aplikasi membuat kalkulator,kali ini saya akan berbagi ilmu lagi,ada yang tau gak apa yang akan saya bagi kali ini???hehehehe
Kali ini saya berbagi bagaimana membuat aplikasi menggunakan HScrollBar dan VScrollBar,langsung aja nih langkah-langkahnya



1.menambahkan Form baru dengan cara Klik Project - Add Windows Form.
2. Menambahkan komponen-komponen listbo,picturebox,Vscrollbar, Hscrollbar dan paneldengan tampilan sebagai berikut:

Mengatur propertinya sebagai berikut :


No
Nama Komponen
Properti
Nilai
1
ListBox1
Name
LBPilih
Items
Gambar1

Gambar2

Gambar3

Gambar4

Gambar5
2
PictureBox1
Name
PBDisplay
Border
FixedSingle
SizeMode
StrecthImage
3
Panel
Name
Panel1
4
HScrollBar
Name
HScrollBar1
5
VScrollBar
Name
VScrollBar1
Klik 2 Kali pada komponen LBPilih dan menuliskan kode :
Private Sub LBPilih_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles LBPilih.SelectedIndexChanged
        If LBPilih.SelectedItem = "Gambar1" Then
            PBDisplay.Image = New Bitmap("Gambar1.bmp")
        ElseIf LBPilih.SelectedItem = "Gambar2" Then
            PBDisplay.Image = New Bitmap("Gambar2.jpg")
        ElseIf LBPilih.SelectedItem = "Gambar3" Then
            PBDisplay.Image = New Bitmap("Gambar3.bmp")
        ElseIf LBPilih.SelectedItem = "Gambar4" Then
            PBDisplay.Image = New Bitmap("Gambar4.jpg")
        Else
            PBDisplay.Image = New Bitmap("Gambar5.bmp")
        End If
Klik 2 Kali pada komponen Form5 dan menuliskan kode :
Private Sub Form5_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Panel1.AutoScroll = True
        PBDisplay.SizeMode = PictureBoxSizeMode.AutoSize
         End Sub

Tampilan Hasil Progam


Tidak ada komentar:

Posting Komentar