VTGet

VTGet
Author: Eurai
Inclusão: 01/01/2016
Alteração: 27/07/2021

Descrição

Cria um novo objeto VTGET e o coloca em exibição na tela

 

Sintaxe

VTGet( <xVar>, <cPic>, <lWhen>, <lValid>, <lPass>, <cF3> )

 

Parâmetros

Par Nome Tipo Descrição Default Obg Ref
01  xVar  Indefinido Variável    X  
02  cPic  Caracter Marcara de Exibição      
03  lWhen  Lógico Se habilita cursor      
04  lValid  Lógico Validação ao sair      
05  lPass  Lógico Se get é do tipo Password      
06  cF3  Caracter Consulta Padrão      

 

Retorno

Retorno Tipo Descrição

 

Exemplo

#INCLUDE "TOTVS.CH"
#INCLUDE "APVT100.CH"

User Function VTGet()
Local nNumber := 0

@ 0, 0 VTSAY "Digite um numero" VTGET nNumber VALID nNumber > 0
VTRead
VTCLEAR
@ 0, 0 VTSAY "Digitou: " + cValtoChar(nNumber)
VTPAUSE

Return( Nil )

Resultado

vtget_-_resultado_01         

vtget_-_resultado_02 

 

Informação Adicional

 

 

 

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

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