IsDigit [AS]

IsDigit [AS]
Author: Eurai
Inclusão: 01/01/2016
Alteração: 01/01/2016

Descrição

Verifica se o primeiro caracter é numérico do parâmetro informado. De 0 ~ 9 .

 

Sintaxe

IsDigit(<cTexto>  )

 

Parâmetros


Par Nome Tipo Descrição Default Obg Ref
01
cTexto Caracter Texto a ser analisado   X  

 

Retorno

Retorno Tipo Descrição
lRet Boolean
Primeira letra é numérico?

 

Exemplo

#INCLUDE "TOTVS.CH"
 
User Function IsDigit()
Local cTexto := 'UniversoADVPL'
 
MsgInfo( 'Valor: ' + cTexto + CRLF + 'Retorno: ' + cValtoChar( IsDigit(cTexto) ), 'UniversoADVPL' )
 
cTexto := '12UniversoADVPL'
MsgInfo( 'Valor: ' + cTexto + CRLF + 'Retorno: ' + cValtoChar( IsDigit(cTexto) ), 'UniversoADVPL' )
 
Return( Nil )

Resultado
isdigit_-_resultado_01     

isdigit_-_resultado_02 

 

 

Informações adicionais

IsAlpha()

IsLower()

IsUpper()

 

 

 

 

 

Gostou? Compartilhe com seus amigos e deixe um comentário! 😎  

 

 

 

 

 

 

 

Esse conteúdo te ajudou? Ajude o canal com doação
Compartilhar
Comentários