COMO: Popular um DataGrid com um conjunto de registros ADO sem usar uma conexão de banco de dados

IMPORTANTE: Este artigo foi traduzido por um sistema de tradução automática (também designado por Machine Translation ou MT), não tendo sido portanto traduzido ou revisto por pessoas. A Microsoft possui artigos traduzidos por aplicações (MT) e artigos traduzidos por tradutores profissionais, com o objetivo de oferecer em português a totalidade dos artigos existentes na base de dados de suporte. No entanto, a tradução automática não é sempre perfeita, podendo conter erros de vocabulário, sintaxe ou gramática. A Microsoft não é responsável por incoerências, erros ou prejuízos ocorridos em decorrência da utilização dos artigos MT por parte dos nossos clientes. A Microsoft realiza atualizações freqüentes ao software de tradução automática (MT). Obrigado.

Clique aqui para ver a versão em Inglês deste artigo: 313330
Este artigo foi arquivado. É oferecido "como está" e não será mais atualizado.
Sumário
Este artigo passo a passo descreve como preencher um Recordset de Microsoft ActiveX Data Objects (ADO) e o DataGrid sem usar uma conexão de banco de dados. Convém usar o DataGrid como uma grade típica. Quando você fizer isso, você pode exibir sem ligar a grade a qualquer fonte de dados. Isso é útil quando você usa a grade como uma planilha. Para fazer isso, você normalmente usa outras grades, como o controle Microsoft FlexGrid. Este artigo descreve como preencher um DataGrid sem usar uma conexão de banco de dados como você faz para FlexGrid.

Back to the top

Pré-requisitos

A lista a seguir descreve o hardware recomendado, software, infra-estrutura de rede e service packs são necessários para este procedimento:
  • Microsoft Visual Basic 6.0
Este artigo pressupõe que você esteja familiarizado com os seguintes tópicos:
  • Terminologia do Visual Basic 6.0 e sintaxe
  • Tecnologias de acesso a dados (ADO)
Back to the top

Preencher o Recordset ADO

Para preencher o Recordset ADO, execute estas etapas:
  1. Abra o Visual Basic 6.0. No menu arquivo , clique em New Project .
  2. Na caixa de diálogo New Project , clique para seleccione Standard EXE e, em seguida, clique em OK.
  3. No menu Project , clique em referências .
  4. Na lista Referências disponíveis , clique duas vezes para selecionar Microsoft ActiveX Data Objects 2.5 Library e, em seguida, clique em OK .
  5. No menu Project , clique em componentes .
  6. Na lista componentes , clique duas vezes para selecionar Microsoft DataGrid controle 6.0 e, em seguida, clique em OK .
  7. Na caixa de ferramentas, clique duas vezes em DataGrid controle.

    DataGrid1 é criado no Form1.
  8. Da mesma forma, adicione dois CommandButtons ao Form1.
  9. Open the Code Editor, and then copy the following code:
    Option Explicit' Create a RecordsetDim rst As ADODB.RecordsetPrivate Sub Command1_Click()     Set rst = New ADODB.Recordset   rst.CursorLocation = adUseClient      ' Add columns to the Recordset   rst.Fields.Append "Key", adInteger   rst.Fields.Append "Field1", adVarChar, 40, adFldIsNullable   rst.Fields.Append "Field2", adDate   ' Open the Recordset   rst.Open , , adOpenStatic, adLockBatchOptimistic   ' Add data to the Recordset   rst.AddNew Array("Key", "Field1", "Field2"), _      Array(1, "string1", Date)   rst.AddNew Array("Key", "Field1", "Field2"), _      Array(2, "string2", #1/1/2000#)   ' Populate the Data in the DataGrid   Set DataGrid1.DataSource = rstEnd SubPrivate Sub Command2_Click()   ' Modify the data through code   rst.MoveFirst   rst(1) = "Changed Field"   rst.UpdateBatchEnd SubPrivate Sub Form_Load()   Command1.Caption = "Populate"   Command2.Caption = "Update"End Sub
Back to the top

Verifique se os resultados

Para verificar os resultados, execute essas etapas:
  1. No menu Executar , clique em Iniciar para executar o aplicativo.
  2. Clique em Preencher para preencher o DataGrid com dados.
  3. Modificar os dados "seqüência2" na segunda linha para "Test String" .
  4. Clique em Atualizar .

    Os dados são modificados em ambas as linhas.

Back to the top
Referências
Para obter informações adicionais, clique no número abaixo para ler o artigo na Base de dados de Conhecimento da Microsoft:
140021ARQUIVO: DBGRIDUB.EXE usa DBGRID em um modo não acoplado
Back to the top

Aviso: este artigo foi traduzido automaticamente

Propriedades

ID do Artigo: 313330 - Última Revisão: 12/07/2015 08:13:50 - Revisão: 2.1

Microsoft Visual Basic 6.0 Professional Edition, Microsoft Visual Basic Enterprise Edition for Windows 6.0, Microsoft Visual Basic 6.0 Learning Edition

  • kbnosurvey kbarchive kbmt kbdatabinding kbuidesign kbforms kbhowtomaster KB313330 KbMtpt
Comentários