Membuat textbox hanya bisa diketik huruf

Senin, 29 November 2010 Membuat textbox hanya bisa diketik huruf.

1.  Buka visual basic 6.0 kemudian tambahkan 1 textbox kedalam
     form.
2.  Buka jendela kode kemudian ketikkan kode dibawah ini
   
     Private Sub txtNama_KeyPress(KeyAscii As Integer)
     If Not (KeyAscii >= Asc("a") & Chr(13) _
     And KeyAscii <= Asc("z") & Chr(13) _
     Or (KeyAscii >= Asc("A") & Chr(13) _
     And KeyAscii <= Asc("Z") & Chr(13) _
     Or KeyAscii = vbKeyBack _
     Or KeyAscii = vbKeyDelete _
     Or KeyAscii = vbKeySpace)) Then
     Beep
     KeyAscii = 0
     End If

3.  Jalankan programnya dan lihat hasilnya.
 
         Segala kekurangan dan kesalahan mohon dikoreksi
         maklum masih pemula. Semoga bisa sedikit membantu
         Jangan lupa tulis komentarnya