Visual Basic - Función equivalente a ISALPHA de Clipper?

Life is soft - evento anual de software empresarial
   
Vista:

Función equivalente a ISALPHA de Clipper?

Publicado por Antonio (93 intervenciones) el 12/04/2009 08:05:27
Hola a todos, buenos días.

¿Cual es en VB6 la función equivalente a ISALPHA de Clipper?
( Determina si el carácter situado más a la izquierda de una cadena es
alfabético.)

Saludos cordiales.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Función equivalente a ISALPHA de Clipper?

Publicado por Antonio (93 intervenciones) el 12/04/2009 09:15:48
Parece ser que no existe.
¿Podría utilizar la siguiente función en su lugar?:

Public Function IsAlpha(ByVal Cadena As String) As Boolean
Dim PrimerCaracter As String
PrimerCaracter = Left(Cadena, 1)
IIf (IsNumeric(PrimerCaracter, IsAlpha = False, IsAlpha = True))
End Function
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Función equivalente a ISALPHA de Clipper?

Publicado por P3L30N2009 (701 intervenciones) el 12/04/2009 09:45:40
Esa función estaría bien si consideras también como caracteres alfabéticos los signos (º,.=&...). Si caracteres alfabéticos son de la A a la Z, podrías crear una función como esta:

Public Function IsAlpha(ByVal cadena As String) As Boolean
If Asc(UCase(cadena)) >= 65 And Asc(UCase(cadena)) <= 90 Then ISALPHA = True
End Function
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Función equivalente a ISALPHA de Clipper?

Publicado por Antonio (93 intervenciones) el 12/04/2009 09:53:19
Gracias P3L30N2009 por responder.

Efectivamente solo quería controlar de la "a ... z" y de la "A ...Z"

Saludos cordiales.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Función equivalente a ISALPHA de Clipper?

Publicado por Antonio (93 intervenciones) el 12/04/2009 10:06:59
Una duda P3L30N2009.
En esta función, IsAlpha por defecto es False?
Osea, si no se cumple:
If Asc(UCase(cadena)) >= 65 And Asc(UCase(cadena)) <= 90 Then ISALPHA = True

Osea, no hace falta poner:
Else
IsAlpha = False

Saludos cordiales.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Función equivalente a ISALPHA de Clipper?

Publicado por P3L30N2009 (701 intervenciones) el 12/04/2009 10:33:11
Efectivamente, una variable booleana siempre se inicializa como False. En este caso, si no se cumple la condición, el valor de retorno sería False.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar