Как описать в программе "ни одно из условий не выполнилось"? - VB

Формулировка задачи:

значит вводим буквы английского алфавита i, v, x, l, c, d, m, их значения получаем в текстовом окне 1, 5, 10, 50, 100, 500, 1000. это все по условию.. Не могу доделать: если мы например вводим "y" то в текстовом окне я должен получить "Нет значения". Вопрос в том как получить "Нет значения" при вводе других символов алфавита? .. и хочетется не перечислять их оставшиеся, а что бы может программа сама понимала... как помогите плиз!)

Private Sub Command1_Click()
Dim i, v, x, l, c, d, m As String
a = Text1
If a = "i" Then Text2 = 1
If a = "v" Then Text2 = 5
If a = "x" Then Text2 = 10
If a = "l" Then Text2 = 50
If a = "c" Then Text2 = 100
If a = "d" Then Text2 = 500
If a = "m" Then Text2 = 1000
 
End Sub

Решение задачи: «Как описать в программе "ни одно из условий не выполнилось"?»

textual
                            Листинг программы 
                        

                            a = Text1
If a = "i" Then
Text2 = 1
ElseIf a = "v" Then
Text2 = 5
ElseIf a = "x" Then
Text2 = 10
ElseIf a = "l" Then
Text2 = 50
ElseIf a = "c" Then
Text2 = 100
ElseIf a = "d" Then
Text2 = 500
ElseIf a = "m" Then
Text2 = 1000
Else
Text2 = "Нет значения"
End If
                        