√ Menciptakan Textbox Hanya Dapat Input Angka Visual Basic 6.0

Tentang Visual Basic 6.0

Visual Basic merupakan salah satu aktivitas untuk menciptakan aplikasi dengan user interface yang gampang diatur. Visual Basic memakai bahasa pemrograman Beginners’ All-purpose Symbolic Instruction Code atau yang disingkat BASIC.

Visual Basic merupakan aplikasi yang cukup terkenal dan telah dipakai secara luas. Awal popularitas VB dimulai ketika maraknya penggunaan VB6 sebagai aplikasi pembuat aplikasi. Selain alasannya ialah gampang digunakan, tidak terlalu berat, dan juga memakai bahasa pemrograman yang gampang dimengerti alias ibarat bahasa manusia.

Nah oleh alasannya ialah itu dalam posting kali ini akan dibahas ihwal salah satu tips Visual Basic 6.0 atau yang biasa disingkat VB6. Tips tersebut ialah bagaimana cara mengatur semoga textbox di VB6 hanya dapat menginput angka, atau hanya dapat mengetik angka pada textbox.

Tentang Textbox VB6

Textbox merupakan salah satu komponen paling umum dan paling banyak dipakai ketika menciptakan aplikasi berbasis UI. Pasalnya textbox menghubungkan eksklusif antara pengguna dengan mesin, textbox memungkinkan pengguna untuk memasukkan informasi tertentu yang dibutuhkan oleh mesin untuk menjalankan sebuah fungsi.

Namun terkadang untuk menyesuaikan informasi yang diberikan pengguna dan informasi yang dibutuhkan mesin, diharapkan beberapa pengaturan semoga tidak terjadi miss komunikasi atau dengan kata lain semoga pengguna tidak salah memasukkan informasi.

Salah satu yang paling umum ialah ketika mesin membutuhkan informasi berupa angka, pengguna dilarang salah memasukkan informasi lain selain angka. Misalnya meminta jumlah sebuah barang, yang dibutuhkan oleh mesin hanyalah variabel bilangan berupa angka, maka pengguna dilarang memasukkan informasi mirip "8 barang".

Mengatur Textbox VB6 hanya dapat input angka

Jadi semoga sebuah textbox di VB6 dapat sesuai kebutuhan, hanya dapat diinput/mengetik angka, diharapkan sedikit adaptasi yang sangat mudah. Untuk mengatur textbox hanya dapat input angka, ikuti langkah-langkah berikut ini:

1. Sebagai contoh, buatlah sebuah project yang berisi sebuah Form dan tentunya sebuah Textbox
2. Klik dua kali pada textbox tersebut untuk masuk ke penulisan kode. Ganti bab Procedure (untuk text1) dari Change menjadi KeyPress

3. Masukkan salah satu isyarat berikut ke dalam perintah KeyPress tersebut

If KeyAscii = 8 Then   KeyAscii = 8 ElseIf KeyAscii < 48 Or KeyAscii > 57 Then   KeyAscii = 0 End If

Atau:

Select Case KeyAscii    Case 48 to 57    Case Else     KeyAscii = 0 End Select

4. Jalankan form tersebut dan lihat hasilnya

Kalau sudah jadi bahwasanya bentuk keseluruhan isyarat tersebut hanya ditambahkan sintaks pembuka Private Sub untuk membedakan fungsi setiap komponen, sehingga jadinya:

Private Sub TextBox_Keypress (KeyAscii As Integer)   If KeyAscii = 8 Then     KeyAscii = 8   ElseIf KeyAscii < 48 Or KeyAscii > 57 Then     KeyAscii = 0   End If End Sub

Makna angka pada isyarat di atas

Jika kau bertanya-tanya apa maksud angka-angka yang ada pada isyarat di atas, angka tersebut merupakan isyarat keyascii. Angka keyascii mewakili setiap tombol pada keyboard yang kau gunakan ketika ini, jadi dapat dibilang angka tersebut ialah "kode identitas" tombol keyboard.

Keyascii 8 merupakan isyarat untuk tombol Back Space sedangkan keyascii 48 hingga 57 merupakan isyarat untuk angka 1 hingga angka 0 di keyboard. Untuk mengetahui apa saja isyarat keyascii untuk setiap tombol keyboard, kau dapat baca caranya di sini.

Penutup

Itulah langkah-langkah yang dapat kau lakukan untuk mengatur semoga textbox pada Visual Basic 6.0 atau VB6 hanya dapat ditulisi angka atau hanya dapat input angka. Semoga artikel ini dapat bermanfaat untuk kamu. Jika ada hal-hal yang kurang jelas, maka jangan sungkan untuk memperlihatkan komentar kau di bawah atau melalui halaman contact blog ini. Terima kasih dan hingga jumpa!
Sumber http://www.maringngerrang.com/