TABELA TEMPORARIA COM DAO
Preciso criar uma tabela temporária em DAO para armazenar COD_ITEM, NOME, QTD e VALOR.
Alguem poderia me ajudar?
Obrigado,
Roberto
Alguem poderia me ajudar?
Obrigado,
Roberto
Crie um udt (tipo definido pelo usuário) que equivale ao record no Pascal, assim:
Type typEndereco
rua As String * 40
Numero As Integer
CEP As Float
End Type
Dim Endereco() As typEndereco ' Declara variavel array sem dimensão
Para inicializar o array com 100 elementos: Redim Endereco(99)
Para redimensionar o array, agora com 500 elementos preservando os anteriores: Redim Endereco(499)
Obs: Por padrão arrays inicam em zero no Visual Basic.
Opss, uma pequena correção, eu havia esquecido o Preserve no redimensionamento do array !
Crie um udt (tipo definido pelo usuário) que equivale ao record no Pascal, assim:
Type typEndereco
rua As String * 40
Numero As Integer
CEP As Float
End Type
Dim Endereco() As typEndereco ' Declara variavel array sem dimensão
Para inicializar o array com 100 elementos: Redim Endereco(99)
Para redimensionar o array, agora com 500 elementos preservando os anteriores: Redim Preserve Endereco(499)
Obs: Por padrão arrays inicam em zero no Visual Basic.
Crie um udt (tipo definido pelo usuário) que equivale ao record no Pascal, assim:
Type typEndereco
rua As String * 40
Numero As Integer
CEP As Float
End Type
Dim Endereco() As typEndereco ' Declara variavel array sem dimensão
Para inicializar o array com 100 elementos: Redim Endereco(99)
Para redimensionar o array, agora com 500 elementos preservando os anteriores: Redim Preserve Endereco(499)
Obs: Por padrão arrays inicam em zero no Visual Basic.
Não foi mal não !!!! Ele não havia explicado...
Tópico encerrado , respostas não são mais permitidas