Membuat Validasi Huruf dan Angka di Visual Basic

Atas permintaan dari seorang mahasiswa ajaran saya yang bertanya tentang validasi input di textbox visual basic, maka disini saya buat kan sedikit contoh simpe dari validasi inputan textbox pada visual basic 6. Dimana dalam input textbox hanya bisa di input huruf, biasa nya hal ini dibutuhkan dalam penginputan nama.agar nama yang digunakan tidak bisa di input menggunakan angka.Berikut contoh script yang saya gunakan pada textnama dengan event keypress.

1. Private Sub txtnama_KeyPress(KeyAscii As Integer)  
2. If Not (KeyAscii >= Asc(“a”) & Chr(13) _  
3. And KeyAscii = Asc(“A”) & Chr(13) _  
4. And KeyAscii <= Asc("Z") & Chr(13) _  
5. Or KeyAscii = vbKeyBack _  
6. Or KeyAscii = vbKeyDelete _  
7. Or KeyAscii = vbKeySpace)) Then  
8. Beep  
9. KeyAscii = 0  
10. End If  
11. End Sub  

Dari script diatas dapat disimpulkan bahwa tiap kita melakukan penginputan ke dalam textnama, maka hanya tombol yang memiliki hasil huruf saja yang dapat di terima oleh textnama

---

Klik Like/share jika anda menyukai tulisan Share

    Syarat Tukar Link/Banner      Blog anda terdaftar di Search Engine dan halaman tukar link anda terindeks di Google.      Terdaftar      Terdapat meta tag search engine pada template.      Terindeks      Halaman blog muncul pada hasil pencarian Google...  

---