Cara Membatasi Jumlah Masukkan Karakter ButtonBox Pada Gambas

Jika pada Textbox atau ComboBox sudah tersedia fitur properti yang membatasi jumlah karakter (huruf/angka) yang dimasukkan. Namun Pada ButtonBox harus dilakukan secara manual, yakni membuat kode program sendiri.

Berikut kode programnya:

Public Sub ButtonBox1_Change()

    If ButtonBox1.Length > 4 Then

          ButtonBox1.Text = Mid(ButtonBox1.Text, 1, 4)

    Endif

End

Result:

Meng

Uraian:

Kode Mid berfungsi untuk menyeleksi karakter pada string berdasakan nomor urutan karakternya. Contoh diatas menyeleksi karakter yang ditampilkan saat jumlah karakter melebihi dari 4, yakni dimulai dari karakter nomor 1 sampai nomor 4.

IGN User