Terima kasih bagi teman-teman yang telah mereply email saya.
 
Mas Herianto,
Setelah saya membaca email dari Mas, Saya baru tahu bahwa KeyAscii 65 sampai dengan 97 merupakan huruf A (besar) sampai Z (besar). Makanya saya langsung lihat kode Ascii di www.lookuptables.com  untuk mendapatkan kode ascii a (kecil) sampai z (kecil). Hasilnya seperti kode dibawah ini.
 
Private Sub Text1_KeyPress(KeyAscii As Integer)
If Not ((KeyAscii >= 65 And KeyAscii <= 90) Or (KeyAscii >= 97 And KeyAscii <= 122) Or KeyAscii = 8) Then KeyAscii = 0
End Sub
 
 
 
----- Original Message -----
From: Herianto
Sent: Tuesday, May 23, 2006 1:36 PM
Subject: Re: [Programmer-VB] Kenapa tombol BackSpace tidak berfungsi di text box

Sebenarnya bisa, tapi yang dientry harus huruf besar.. Mas Frangky sendiri kan yang membatasi keyascii-nya dari 65 sampai 90 ..?? Itu artinya karakter yang bisa dientry di text1 itu dari huruf A (besar) sampai Z (besar). Coba mas entry pakai huruf besar...
 
----- Original Message -----
From: Frangky
Sent: Tuesday, May 23, 2006 11:59 AM
Subject: Re: [Programmer-VB] Kenapa tombol BackSpace tidak berfungsi di text box

Mas Herianto, setelah saya pakai tanda kurung, bukan saja tombol BackSpace yang ngga bisa, tapi semua tombol jadi ngga berfungsi. Justru lebih kacau.
Kalau saya ganti eventnya di Key_Down, semua tombol berfungsi. Padahal saya hanya mau membatasi supaya di text box, hanya boleh input huruf. tidak boleh angka.
----- Original Message -----
From: Herianto
Sent: Tuesday, May 23, 2006 9:56 AM
Subject: Re: [Programmer-VB] Kenapa tombol BackSpace tidak berfungsi di text box

Kurang tanda kurungnya...
 
Private Sub Text1_KeyPress(KeyAscii As Integer)
    If Not (KeyAscii >= 65 And KeyAscii <= 90 Or KeyAscii = 8) Then KeyAscii = 0
End Sub
----- Original Message -----
From: Frangky
Sent: Tuesday, May 23, 2006 8:19 AM
Subject: [Programmer-VB] Kenapa tombol BackSpace tidak berfungsi di text box

Friends,
 
Saya pakai kode dibawah ini, tapi kenapa tombol BackSpace tidak berfungsi!
Mohon bantuannya.
 
Private Sub Text1_KeyPress(KeyAscii As Integer)
    If Not KeyAscii >= 65 And KeyAscii <= 90 Or KeyAscii = 8 Then
    KeyAscii = 0
    End If
End Sub
 
 
Terima kasih.


Wahana Programmer Groups Links

<*> Untuk mengunjungi sponsor milis ini, klik link berikut:
    http://wahanaprogrammer.net

<*> Untuk menghubungi owner milis ini, kirim email ke:
    [EMAIL PROTECTED]

<*> Konsultasi pemrogramman bisa chat disini:
    Yahoo! Messenger: wahanaprogrammer




SPONSORED LINKS
Programmer Indonesia Basic programming language
Computer programming languages Programming languages Java programming language


YAHOO! GROUPS LINKS




Kirim email ke