Hola lo que me gustaria es que una variable guarde unos datos de un textbox al dar a un boton y luego al dar a otro boton esos datos salgan en un msgbox sin las 3 primeras letras

Porfavor si podeis poner el codigo gracias

Se me ha olvidado comentrar que me gustaria que dependiendo de las 3 primeras letras se ponga rojo o azul el form

Copia esto y pegalo en la hoja de codigo


Dim MiCadena As String
Private Sub Command1_Click()
MiCadena = Text1.Text
End Sub


Private Sub Command2_Click()
MsgBox Mid(MiCadena, 4) 'Empieza a desde el 4ºCaracter
'los 3 tres primeros son ignorados
CambiarColor
End Sub


Private Sub CambiarColor()
Select Case Mid(MiCadena, 1, 3)
Case "Tex"
Me.BackColor = vbRed
Case "xyz"
Me.BackColor = vbBlue
End Select
End Sub


La rutina que cambia color la tienes que personalizar, pero lo que quieres es bastante complicado, por que tiene muchas posibilidades, digamos solo con los caracteres a,b,c, podemos formar las combinaciones:


abc,acb,bac,bac,cab,cba, para el caso de que solo tenga letras las combinaciones de las letras son miles. Cualquier cosa postea otro mensaje.

Encontre la forma de hazerlo facil pero gracias de todas formas