:))
----- Original Message ----- From: aksan kurdin To: [email protected] Sent: Thursday, February 12, 2009 12:34 PM Subject: Re: [belajar-access] Re: Font Besar Untuk semua Textbox Jadi field yang seharusnya bukan huruf besar, jadi kena juga diubah menjadi huruf besarnya. Ada apa sih dengan tombol capslock ? kok susah amat ya nekannya ? gak pake code-code-an ... aksan kurdin 2009/2/12 Lukito Hartono <[email protected]>: > Mas Teguh, > > Saya biasanya pakai cara: > > 1. Ubah Form Properties 'Key Preview' menjadi 'Yes' > > 2. Di Form Event 'On Key Press' pakai kodingan mas Teguh yg ini: > > Select Case KeyAscii > Case 97 To 127: ' a..z > KeyAscii = KeyAscii - 32 ' a(97) -> A(65) > End Select > > ATAU > > KeyAscii = Asc(UCase(Chr(KeyAscii))) > > Nah, dengan cara seperti ini tidak ada batasan jumlah textbox, malah > Input Control lain seperti combobox juga termasuk. > > He..he..he...sekali tembak, kena semua. > > Thanx. :D > > Lukito Hartono > > -- Aksan Kurdin
