Code Problem

[ukjock]

Hi guys, wondering if you can help me with this code.

 

I want to subtract 1 from a letter so for example if I subtracted one from the letter B then it would become A. I am doing this because I am unsure what letter is going to be in the label.

 

I thought this code might work but it returns an error of:

 

An unhandled exception of type 'System.InvalidCastException' occurred in microsoft.visualbasic.dll

 

Additional information: Cast from string "B" to type 'Double' is not valid.

 

What do you think??

 

Dim NewLetter As String
Dim LetterLine1 As String
Dim LetterLine2 As String

LetterLine1 = Label12.Text
LetterLine2 = Label13.Text

If Asc(LetterLine2) > Asc(LetterLine1) Then
NewLetter = Chr(Asc(LetterLine2 - 1))
End If

 

Thanks for reading

 

Chris.

[sharpcoder]

NewLetter = Chr(Asc(LetterLine2) - 1) maybe? hmm

[ukjock]

top man Sharpcoder!

 

U R A *