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

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.

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

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

Gracias P3L30N2009 por responder.

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

Saludos cordiales.

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.

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.