Visual Basic?

[Carlee10]

I need some Visual Basic.Net help. Im using an older edition, and I didn't see anything in the programming, so I put it here.....feel free to move it. I have code for the project (Pig Latin Translator) I am working on if anyone thinks they might be able to fix/help it. Thanks.


/code/ ' Uses select case to determine vowels and consonants, and to translate text to
' pig latin.

Dim strInput As String = ""
Dim str1stCharacter As String = ""
Dim strOutput As String = ""
Dim intStringLength As Integer = 0
strInput = txtInput.Text
str1stCharacter = Microsoft.VisualBasic.Left(strInput, 1)
Select Case str1stCharacter.ToUpper()
Case "A", "E", "I", "O", "U"
strOutput = strInput & "WAY"
Case Else
intStringLength = Len(strInput)
strOutput = Microsoft.VisualBasic.Right(strInput, 3) & Microsoft.VisualBasic.Left(strInput, 2) & "AY"
End Select
MessageBox.Show("The Pig Latin Translation is: " & strOutput)
Exit Sub
/code/