[Resolved]How to use To.Upper Procedure?

[nidhishah]

Hello,

I'm working on a project where an application requires to show 50 US state names.

When User enters the abriviation in the text box, I want it to convert into Upper case. I made an attempt and coded like this:

strAbriviation = strAbriviation.ToUpper(txtAbriviation.Text)

but that didn't work !! it gives me that blue swigly line

How do I fix this?

Private Sub btnDisplay_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnDisplay.Click
        Dim strAbriviation As String



        strAbriviation = Convert.ToString(Me.txtAbriviation.Text)
        strAbriviation = strAbriviation.ToUpper(txtAbriviation.Text)


        Select Case Me.txtAbriviation.Text
            Case "AL"
                Me.lblResult.Text = "Alabama"
            Case "AK"
                Me.lblResult.Text = "Alaska"
            Case "AZ"
                Me.lblResult.Text = "Arizona"
            Case "AR"
                Me.lblResult.Text = "Arkansas"
            Case "CA"
                Me.lblResult.Text = "California"
            Case "CO"
                Me.lblResult.Text = "Colorado"
            Case "CT"
                Me.lblResult.Text = "Conneticut"
            Case "DE"
                Me.lblResult.Text = "Delaware"
            Case "FL"
                Me.lblResult.Text = "Florida"
            Case "GA"
                Me.lblResult.Text = "Georgia"
            Case "HI"
                Me.lblResult.Text = "Hawaii"
            Case "ID"
                Me.lblResult.Text = "Idaho"
            Case "IL"
                Me.lblResult.Text = "Illinois"
            Case "IN"
                Me.lblResult.Text = "Indiana"
            Case "IA"
                Me.lblResult.Text = "Iowa"
            Case "KS"
                Me.lblResult.Text = "Kansas"
            Case "KY"
                Me.lblResult.Text = "Kentucky"
            Case "LA"
                Me.lblResult.Text = "Louisiana"
            Case "ME"
                Me.lblResult.Text = "Maine"
            Case "MD"
                Me.lblResult.Text = "Maryland"
            Case "MA"
                Me.lblResult.Text = "Massachusets"
            Case "MI"
                Me.lblResult.Text = "Michigan"
            Case "MN"
                Me.lblResult.Text = "Minnesota"
            Case "MS"
                Me.lblResult.Text = "Mississippi"
            Case "MO"
                Me.lblResult.Text = "Missouri"
            Case "MT"
                Me.lblResult.Text = "Montana"
            Case "NE"
                Me.lblResult.Text = "Nebraska"
            Case "NV"
                Me.lblResult.Text = "Nevada"
            Case "NH"
                Me.lblResult.Text = "New Hampshire"
            Case "NJ"
                Me.lblResult.Text = "New Jearsy"
            Case "NM"
                Me.lblResult.Text = "New Mexico"
            Case "NY"
                Me.lblResult.Text = "New York"
            Case "NC"
                Me.lblResult.Text = "North Caroline"
            Case "ND"
                Me.lblResult.Text = "North Dakota"
            Case "OH"
                Me.lblResult.Text = "Ohio"
            Case "OK"
                Me.lblResult.Text = "Oklahoma"
            Case "OR"
                Me.lblResult.Text = "Oregon"
            Case "PA"
                Me.lblResult.Text = "Pennsylvania"
            Case "RI"
                Me.lblResult.Text = "Rhode Island"
            Case "SC"
                Me.lblResult.Text = "South Carolina"
            Case "SD"
                Me.lblResult.Text = "South Dekota"
            Case "TN"
                Me.lblResult.Text = "Tennessee"
            Case "TX"
                Me.lblResult.Text = "Texas"
            Case "UT"
                Me.lblResult.Text = "Utah"
            Case "VT"
                Me.lblResult.Text = "Vermont"
            Case "VA"
                Me.lblResult.Text = "Virginia"
            Case "WA"
                Me.lblResult.Text = "Washington"
            Case "WV"
                Me.lblResult.Text = "West Virginia"
            Case "WI"
                Me.lblResult.Text = "Wisconsin"
            Case "WY"
                Me.lblResult.Text = "Wyoming"
            Case Else
                MsgBox("Enter a valid abriviaiton", MsgBoxStyle.OkCancel Or MsgBoxStyle.Critical, "User Input Error")
                Me.txtAbriviation.Clear()
                Me.txtAbriviation.Focus()

        End Select

    End Sub

This code works fine when user enters Capital letters. It's just that i want it to work if user enters small letters.