Bueno, tengo dos soluciones para esto, podes hacerlo con la funcion StrComp o bien con UCase o LCase....
Por ejemplo con StrComp, seria asi:
Código:
If StrComp(Text1, "Velocidad Máxima", vbTextCompare) = 0 Then
Msgbox "Velocidad Máxima"
Else
MsgBox ""
End If
Con LCase o UCase
Código:
' Ojo: Podes cambiar LCase por UCase
If LCase(Text1) = LCase("Velocidad Máxima") Then
Msgbox "Velocidad Máxima"
Else
MsgBox ""
End If
Espero te sirva

Saludos