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