Basic - Visual Basic

Estimados: Tengo que entregar un trabajo practico, En basic 6.0, tema conversor de unidades, y tengo el problema de que cuando ingreso una letra o palabra me tira un debug, pero no se como hacer para solucionarlo y es urgente. Soy principiante y agradecería su ayuda. Gracias


Private Sub cmdconvertir_Click()
If Option1.Value = True Then
lblresultado = "Milimetros"
Else
If Option2.Value = True Then
lblresultado = "Centimetros"
Else
If Option3.Value = True Then
lblresultado = "Decimetros"
Else
If Option4.Value = True Then
lblresultado = "Kilometros"
End If
End If
End If
End If
If txt1 <> "" Then
If txt1 >= 0 And txt1 <= 9999 Then
If Option1.Value = True Then
txtconvercion = txt1 * 1000
Else
If Option2.Value = True Then
txtconvercion = txt1 * 100
Else
If Option3.Value = True Then
txtconvercion = txt1 * 10
Else
Option4.Value = True
txtconvercion = txt1 / 1000


End If
End If
End If
Else
txt1 = MsgBox("Por favor ingrese un número entre 0 y 9999", vbCritical)
End If
Else
txt1 = MsgBox("Por Favor Ingrese un Número para poder Calcular", vbExclamation)
txt1.SetFocus
End If
End Sub
Private Sub cmdnuevo_Click()
txt1 = ""
txtconvercion = ""
lblresultado = "RESULTADO"
txt1.SetFocus
End Sub
Private Sub Command1_Click()
End
End Sub

Private Sub Form_Load()

End Sub

Este es el programa, hay que ingresar en una casilla(textbox) cantidad en metros y en otra obtener centímetros, decímetros, milímetros o kilómetros. El problema que cuando ingreso una letra en cantidad de metros, al presionar calcular me arroja un error.

Hola, Necesito saber las generacione de basic, asi como sus autore, ect.
porfabor ayunenme en eso solo consigo la historia
gracias..