TextBox UpperCase Only

LEARN 3 : ABOUT IT [VB.NET]

LESSON 10 : UPPERCASE TEXT IN VB6 TEXTBOX


Codes that I used to make the text(s) automatically in UPPERCASE :

Private Sub txtstk_Change()
    Dim selSt As Long
    selSt = txtstk.SelStart
    txtstk.Text = UCase(txtstk.Text)    
    txtstk.SelStart = selSt
End Sub

Source : My previous study