slash
16 de Julio del 2003

hola a todos
tengo el siguiente codigo :
Dim strname As String

strname = Fg2.Text

Select Case Left(strname, 3)


Case "MOD"

Call Modeletext
Call Modpretext
Call Modsubtext
Call Modbastext

Case "ELE"

Call Elesubtext
Call Elepretext
Call Elebastext

Case "SUB"

Call Subpretext
Call Subbastext

Case "PRE"

Call Prebastext

Case "BAS"

Call Basmattext

End Select



End Sub

Comparo una cadena que puede tener 3 numeros cualquiera
y lo que pasa es que al buscar MOD por ejemplo quiero me me traiga las cadenas igual indepèndientemente que sean mayusculas o minusculaspor ejemplo "mOD","mod",Mod", etc.
Espero me puedan ayudar.
Gracias

Terion
16 de Julio del 2003

busca informacion sobre Ucase y Lcase te darà la respuesta que buscas

SmacK
16 de Julio del 2003

En este caso tu Case hace referencia a un cadena en mayusculas ej. "BAS", entonces si strname = Bas no va a hacer nada porque son cadenas diferentes, la solución es muy sencilla...cambia la linea strname = Fg2.Text por strname = Ucase(Fg2.Text), esto va a hacer que a strname siempre le asignes una cadena en mayusculas, te recomiendo checar también lcase por si quisieras hacerlo con minusculas