Galera, eu to com uma dúvida meio boba mas q ta me dando dor de cabeça...

tenho uma textbox q recebe alguns comandos: por exemplo:

"erro,XX"

onde XX é sempre dois números. Então eu preciso fazer uma condição:

if txtComandos.text = "erro," & XX

mas na condição eu precisaria de verificar se os XX são números, independente do valor, pois XX poderiam ser 18, 29, 99 ... (quaisquer números de dois algarismos).

 

Se puderem me ajuda... serei muito grato.

Use a função Mid..

 

Dim vTexto as string

 

vTexto = Mid(txtcomandos.text,5,2)

msgbox vtexto 

 

Espero que ajude...

encontre a posição faça o mid como disse o colega e faça txtInvisible.text=XX depois cheque

if not isnumeric(txtinvisible.text) then...........