Cara Mengatur Angka menggunakan UpDown–VB6

Friday, October 10, 2014

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.

image

- 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.

image

- Sekian tutorialnya , Semoga bermanfaat.

0 comments:

Post a Comment