Dalam pemrograman antarmuka, terkadang kita hanya ingin kontrol TextBox menerima input numerik, sedangkan input lainnya diabaikan. Kode sumber spesifik diberikan di bawah ini:
Kami menambahkan acara KeyPress untuk TextBox
Sub Teks Pribadi1_KeyPress (KeyAscii Sebagai Integer)
Jika KeyAscii <> 8 Dan KeyAscii < 48 Atau KeyAscii > 57 Maka
Berbunyi
KunciAscii = 0
Akhiri Jika
Akhiri Sub
Prinsip khusus di atas adalah: tentukan apakah nilai KeyAscii dari tombol yang ditekan antara 48-57. Jika antara 48 dan 57 maka yang dimasukkan adalah angka, jika tidak maka tidak untuk memudahkan input. Hapus jika error, dalam hal ini maka KeyAscii <> 8 harus ditambahkan agar tidak diabaikan saat menggunakan tombol kembali.