TOTVSTEC

Árvore de páginas

Retorna um caractere que identifica o tipo de dado da variável informada através do parâmetro.

Sintaxe

ValType( < xParam > )

Parâmetros

Nome

Tipo

Descrição

Obrigatório

Referência

xParam

qualquer

Indica o dado ou a variável que se deseja identificar.

X

 

Retorno

Nome

Tipo

Descrição

cRet

caractere

Retorna um caractere que identifica o tipo de dado informado.

Observações

  • Tipos de dados válidos:

Tipo de dado 

ValType

Array

A

Bloco de código

B

Caractere

C

Data

D

Lógico

L

Numérico

N

Decimal de ponto fixo

F

Objeto

O

Não definido

U

Exemplos

#DEFINE CRLF Chr(13)+Chr(10)
User Function Exemplo()
  Local aArray := {}
  Local bBloco := {|| .T.}
  Local cCaractere := "Caractere", cMensagem := ""
  Local dData := Date()
  Local lLogico := .T.
  Local nNumerico := 1024.2048
  Local oObjeto := MSDialog():Create()
  Local uUndefined := Nil
  //+----------------------------------------------------------------------------+
  //|Exemplifica o uso da função ValType |
  //+----------------------------------------------------------------------------+
  cMensagem += "[" + ValType(aArray) + "] Array" + CRLF
  cMensagem += "[" + ValType(bBloco) + "] Bloco de código" + CRLF
  cMensagem += "[" + ValType(cCaractere) + "] Caractere" + CRLF
  cMensagem += "[" + ValType(dData) + "] Data" + CRLF
  cMensagem += "[" + ValType(lLogico) + "] Lógico" + CRLF
  cMensagem += "[" + ValType(nNumerico) + "] Numérico" + CRLF
  cMensagem += "[" + ValType(oObjeto) + "] Objeto" + CRLF
  cMensagem += "[" + ValType(uUndefined) + "] Undefined"
  //+----------------------------------------------------------------------------+
  //|Apresenta uma mensagem com os resultados obtidos |
  //+----------------------------------------------------------------------------+
Return MsgInfo(cMensagem, "Exemplo do ValType")

Preview

Veja também

  • Sem rótulos