Visual Basic - Ayuda con If / Then

hola,
estoy desarrollando una pequeña aplicacion en visual basic 6 y no me sale algo que quiero hacer... a ver si tu sabes.
tengo 2 cajas de texto para que se multipliquen con un boton, pero si una de ellas es igual a la letra "A" entonces el valor de esa caja semultiplicara por 4.
esto es para calcular notas universitaria

No entiendo muy bien lo que quieres decir... Si en las cajas pones letras no se como las multiplicas pero bueno... creo que deberías explicarlo un poquito mejor.

Si por ejemplo A lo introduces en Text1.Text sería algo así:

If Text1.Text = \"A\" Then
Val(Text1.Text) = \"4\"
End If

Pero no estoy muy seguro de haber comprendido lo que necesitas. Quizá si te explicas algo mejor seguro que te ayudo.

Un saludo.