Hej, jag skulle vilja veta hur man kan ställa in en textbox till att endast visa versaler. Alltså om jag skriver in en text med endast gemener ska den synas som versaler i textrutan.

Anledningen är att jag håller på med ett litet korsord och använder textboxar som rutorna i korsordet och vill att det bara ska synas versaler i dem.

Tack på förhand
Niklas

Detta borde väl fungera tror jag:

<code>
Private Sub Text1_Change()
Text1.Text = UCase(Text1.Text)
End Sub
</code>

Så här kan du göra.
Men som fidde skriver om det bara gäller en bokstav
<code>
Private Sub Text1_KeyPress(KeyAscii As Integer)
''Alla bokstäver blir (stora) versaler vid direktskrivning
Select Case KeyAscii
Case 97 To 122, 215 To 255
KeyAscii = KeyAscii - 32
End Select
End Sub
</code>

SvenPon: UCase gäller faktiskt alla tecken i strängen.

/Micke