Histórico da Página
...
Portuguese | |||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Função: AAdd
Inclui um elemento no array e ao elemento, do array recém-criado, é atribuido o valor especificado por parâmetro <expValor>. AAdd ( < aDestino>, < XExpValor> ) --> Nil
Nil (Nulo)
#DEFINE CRLF Chr(13)+Chr(10)User Function Exemplo()Local aArray := {}, aExemplo := {}Local cCaractere := "Exemplo", cMensagem := ""Local dData := Date()Local lLogico := .T.Local nNumerico := 86887//+----------------------------------------------------------------------------+//|Exemplifica o uso da função AAdd |//+----------------------------------------------------------------------------+ AAdd(aExemplo, aArray ) AAdd(aExemplo, cCaractere) AAdd(aExemplo, dData ) AAdd(aExemplo, lLogico ) AAdd(aExemplo, nNumerico ) cMensagem += "aExemplo[1] = " + cValToChar(aExemplo[1]) + CRLF cMensagem += "aExemplo[2] = " + cValToChar(aExemplo[2]) + CRLF cMensagem += "aExemplo[3] = " + cValToChar(aExemplo[3]) + CRLF cMensagem += "aExemplo[4] = " + cValToChar(aExemplo[4]) + CRLF cMensagem += "aExemplo[5] = " + cValToChar(aExemplo[5]) + CRLF//+----------------------------------------------------------------------------+//|Apresenta uma mensagem com os resultados obtidos |//+----------------------------------------------------------------------------+Return MsgInfo(cMensagem, "Exemplo do AAdd") Microsiga Protheus 8.11 , Protheus 10 |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas