Visual Basic.NET - donde está en fallo?

me da un fallo en la siguiente sentencia... sabes en que?

Select Case txttipo.text
Case "Teléfono"
txttipo.Text = "T"
Case "Fax"
txttipo.Text = "F"
Case "Móvil"
txttipo.Text = "M"
End Select

pero esta error...que es lo que te dice...y en que procedimiento te da este error..sera que es cuando recibe o pierde el enfoque tu text..aparentemente esta se ve bien el codigo...

Hola

Posiblemente el error sea que estas modificando la misma variable que estas tratando de comparar y el Visual Studio no te lo permite (y es que no deberia permitirtelo)

Lo que deberias hacer es algo como esto:
dim s as string;
Select Case txttipo.text
Case "Teléfono"
s = "T"
Case "Fax"
s = "F"
Case "Móvil"
s = "M"
End Select
txttipo.text = s

Saludos