saya biasanya memakai ini di event keypressed keyascii=asc(ucase*chr(keyascii)))
semoga membantu --- In [email protected], Juned Syafruddin <[EMAIL PROTECTED]> wrote: > > DEar programmer > > Ada yang tau gak untuk mengaktifkan capslock untuk input Huruf besar di teks > atau ada trik untuk itu > > sebenarnya saya sudah buat dengan cara seperti ini > > Private Sub txtSjno_Change() > txtSJNO.Text = UCase(txtSJNO.Text) > txtSJNO.SelStart = Len(txtSJNO.Text) > > End Sub > > tapi kendalanya bila kita rubah huruf yang letaknya di tengah maka akan langsung lompat ke akhir kata > > mohon pencerahannya > > terima kasih sebelumnya > > Juned > > > --------------------------------- > Never miss a thing. Make Yahoo your homepage. > > [Non-text portions of this message have been removed] >
