Converting textbox to uppercase

[blakemckenna]

How do you convert text in the Keypress event to uppercase everytime you enter a character? I know how to do it in straight VB but not sure in VBA.

Thanks,

Blake

[salvelinus]

UCase()

[blakemckenna]

I just used the same method that you use in VB.

Text1.Text = Asc(Ucase(Chr(Keyascii)))

[westconn1]

text1.text = ucase(text1.text)

pete

[asmdev]

Private Sub Button1_KeyPress(KeyAscii As Integer)
    KeyAscii = Asc(UCase(Chr(KeyAscii)))
End Sub

[blakemckenna]

Dev,

Thanks for the code but that's what I always use for straight VB, however, I did retry it in VBA and it did work. Don't know why it didn't work the first time.
But thanks for the 2 cents.

Blessings,

Blake

[RobDog888]

Blake, most of VB6's basic functions, methods, and coding syntax is the same as VBA.