Bagaimana cara menambah jumlah angka pada textbox tanpa diketik? salah satu caranya ialah menggunakan komponen UpDown yang berguna untuk mengatur angka yang kita inginkan cukup dengan meng-klik, untuk langkah-langkahnya sebagai berikut:
- Buka VB6 nya kemudian buat sebuah form.
- Masukan komponen Microsoft Windows Common Control.
- Setelah selesai masukan ke form 1 textbox dan 1 UpDown.
- Kemudian masukan sintak berikut ke Form Load untuk mengatur nilai min & max UpDown:
Private Sub Form_Load()
Me.UpDown1.Min = 0
Me.UpDown1.Max = 100
End Sub
- dan sintak berikut ke Updown1 untuk mengatur angkanya:
Private Sub UpDown1_Change()
Me.Text1.Text = "Angka: " & Str(Me.UpDown1.Value)
End Sub
- Setelah selesai maka kita jalankan programnya dan klik updownnya maka otomatis angka yang ada didalam textbox akan berubah.
- Sekian tutorialnya , Semoga bermanfaat.
0 comments:
Post a Comment