Menggunakan Hscrollbar Dan Vscrollbar

Baca Juga

Kontrol ScrollBar( baik Hscrollbar  maupun Vscrollbar ) merupakan kontrol yang dapat digunakan untuk melakukan penambahan atau pengurangan nilai dengan posisi hriontal dan vertikal.

Contoh nya :

1. Buka file. Setelah itu desain seperti ini :




















2. Ubahlah properti masing-masing kontrol dengan ketentuan sbb :











3. Tulislah Kode berikut pada masing-masing kontrol :

Private Sub optkanan_Click() "Perintah OptKanan"
txtteks.Alignment = 1
End Sub

Private Sub optkiri_Click() "Perintah OptKiri"
txtteks.Alignment = 0
End Sub

Private Sub opttengah_Click() "Perintah OptTengah"
txtteks.Alignment = 2
End Sub

Private Sub opthijau_Click() "Perintah OptHijau"
txtteks.BackColor = vbGreen
End Sub

Private Sub optkuning_Click() "Perintah OptKuning"
txtteks.BackColor = vbYellow
End Sub

Private Sub optputih_Click() "Perintah OptPutih"
txtteks.BackColor = vbWhite
End Sub

Private Sub CmdHapus_Click() "Perintah CmdHapus"
txtteks.Text = ""
End Sub

Private Sub CmdTutup_Click() "Perintah CmdTutup"
End
End Sub

5. Jalankan Programnya

Artikel Terkait


EmoticonEmoticon