All - force lower case as keys are entered

'in the KeyPress event of the control

'force lower case
KeyAscii = Asc ( Lcase ( Chr (KeyAscii)))

'force upper case
KeyAscii = Asc ( Ucase ( Chr (KeyAscii)))