Entrar

Como vincular um ArrayList ou uma coleção de objetos a um Windows Form usando o Visual Basic 2005 ou Visual Basic .NET

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.

313640
Este artigo foi arquivado. É oferecido "como está" e não será mais atualizado.
Para obter uma Microsoft Visual translation from VPE for Csharp .NET versão deste artigo, consulte 313634.
Sumário
Este artigo passo a passo descreve como vincular uma ArrayList de objetos a um formulário do Microsoft Windows no Microsoft Visual Basic 2005 ou no Microsoft Visual Baisc .NET. O exemplo neste artigo inclui um Windows Form com três caixas de texto para exibir as propriedades do objeto. O exemplo também inclui quatro botões de comando para procurar ArrayList .

Requisitos

A lista a seguir descreve o hardware recomendado, software, infra-estrutura de rede e service packs que você precisa:
  • Visual Basic 2005 ou o Visual Basic .NET
Este artigo presume que você tenha uma compreensão intermediária de conceitos de programação Visual Basic.

Descrição do código

Esta seção realça os conceitos de codificação que são necessários para realizar essa tarefa.

Criar a classe

Uma classe que será acoplada a um formulário deve ter acessadores de propriedade. Qualquer propriedade que será vinculada deve ter o Conjunto de propriedades e métodos Property Get . A classe que é usada para o exemplo neste artigo tem três propriedades (somente um é mostrado nesta seção). O exemplo neste artigo também inclui um construtor com parâmetros, embora isso não seja necessário.
Public Class guitar    Private m_make As String    Private m_model As String    Private m_year As Short    Public Sub New(ByVal make, ByRef model, ByVal year)        Me.make = make        Me.model = model        Me.year = year    End Sub    Public Property make() As String        Get            Return m_make        End Get        Set(ByVal Value As String)            m_make = Value        End Set    End PropertyEnd Class				

Adicionar classe instâncias a um ArrayList

A próxima etapa é criar objetos e adicioná-los à classe ArrayList :
Private al As New ArrayList()al.Add(New guitar("Gibson", "Les Paul", 1958))al.Add(New guitar("Fender", "Jazz Bass", 1964))al.Add(New Guitar("Guild", "Bluesbird", 1971))				

Vincular as propriedades do objeto a controles de formulário

Depois que o ArrayList estiver preenchido, você pode vincular as propriedades individuais do objeto para controles Windows Forms. Para fazer isso, chame o método Add da propriedade DataBindings do controle TextBox . Além disso, passa a propriedade do controle que será acoplada, o nome de ArrayList e a propriedade do objeto.
TextBox1.DataBindings.Add("Text", al, "Make")TextBox2.DataBindings.Add("Text", al, "Model")TextBox3.DataBindings.Add("Text", al, "Year")				

Fornecer um meio para procurar o ArrayList

Na etapa final desse processo, você pode usar uma classe CurrencyManager para procurar por meio de ArrayList . Para fazer isso, associe CurrencyManager BindingContext do formulário (no caso, o ArrayList ).
Private cMan As CurrencyManagercMan = CType(Me.BindingContext(al), CurrencyManager)				
a classe CurrencyManager tem uma propriedade posição que você pode manipular para iterar sobre os membros de ArrayList . Adicionando ou subtraindo-se de, o valor atual de posição , você pode exibir membros diferentes de ArrayList no formulário. Por exemplo:
'Move forward one element. cMan.Position += 1'Move back one element.cMan.Position -= 1'Move to the beginning.cMan.Position = 0'Move to the end.cMan.Position = al.Count - 1				

Exemplo passo a passo

  1. Crie um novo projeto Windows Application no Visual Basic 2005 ou no Visual Basic. NET. Form1 é adicionado para o projeto por padrão.

    Observação Você deve alterar o código no Visual Basic 2005. Por padrão, o Visual Basic cria dois arquivos para o projeto quando você cria um Windows Forms projeto. Se o formulário é denominado Form1, os dois arquivos que representam o formulário são chamados de Form1.vb e Form1.Designer.vb. Escreva o código no arquivo Form1.vb. O Windows Forms Designer escreve o código no arquivo Form1.Designer.vb. Os Windows Forms Designer usa a palavra-chave partial para dividir a implementação de Form1 em dois arquivos separados. Esse comportamento impede que o código gerado pelo designer sendo intercaladas com seu código.

    Para obter mais informações sobre os novos aprimoramentos linguagem Visual Basic 2005, visite o seguinte Microsoft Developer Network site (MSDN): Para obter mais informações sobre classes parciais e o Windows Forms Designer, visite o seguinte site da MSDN:
  2. Adicione uma classe para o projeto.
  3. Substitua o código no Class1.vb com o seguinte código:
    Public Class guitar    Private m_make As String    Private m_model As String    Private m_year As Short    Public Sub New(ByVal make, ByRef model, ByVal year)        Me.make = make        Me.model = model        Me.year = year    End Sub    Public Property make() As String        Get            Return m_make        End Get        Set(ByVal Value As String)            m_make = Value        End Set    End Property    Public Property model() As String        Get            Return m_model        End Get        Set(ByVal Value As String)            m_model = Value        End Set    End Property    Public Property year() As Short        Get            Return m_year        End Get        Set(ByVal Value As Short)            m_year = Value        End Set    End PropertyEnd Class					
  4. Adicione três controles TextBox ao Form1 e, em seguida, organize os controles horizontalmente.
  5. Adicione quatro controles de botão ao Form1 e, em seguida, organize os controles horizontalmente.
  6. Altere a propriedade Text dos botões da seguinte maneira:
    BotãoTexto
    Button1Próxima
    Button2Anterior
    Button3Primeiro
    Button4Último
  7. Adicione o seguinte código à seção Declaração de Form1:
    Private al As New ArrayList()Private cMan As CurrencyManager					
  8. Adicione o seguinte código ao evento Form_Load :
    al.Add(New guitar("Gibson", "Les Paul", 1958))al.Add(New guitar("Fender", "Jazz Bass", 1964))al.Add(New Guitar("Guild", "Bluesbird", 1971))cMan = CType(Me.BindingContext(al), CurrencyManager)TextBox1.DataBindings.Add("Text", al, "make")TextBox2.DataBindings.Add("Text", al, "model")TextBox3.DataBindings.Add("Text", al, "year")					
  9. Adicione o seguinte código após o evento Form_Load :
    Private Sub Button1_Click(ByVal sender As System.Object, _ByVal e As System.EventArgs) Handles Button1.Click        cMan.Position += 1End SubPrivate Sub Button2_Click(ByVal sender As System.Object, _ByVal e As System.EventArgs) Handles Button2.Click        cMan.Position -= 1End SubPrivate Sub Button3_Click(ByVal sender As System.Object, _ByVal e As System.EventArgs) Handles Button3.Click        cMan.Position = 0End SubPrivate Sub Button4_Click(ByVal sender As System.Object, _ByVal e As System.EventArgs) Handles Button4.Click        cMan.Position = al.Count - 1End Sub					
  10. Criar e executar o projeto.
  11. Clique nos botões para exibir elementos de matriz diferentes. Observe que você pode editar os valores dos objetos.

Usar um objeto de coleção

Você também pode usar um objeto de coleção para armazenar as estruturas. Para testar o uso de um objeto de coleção , execute estas etapas:
  1. Localize o seguinte código no procedimento de evento Form_Load :
    Private al As New ArrayList()					
  2. Substitua o código acima com o código a seguir:
    Private al As New Collection()					
  3. Salvar as alterações para o projeto e, em seguida, execute novamente o projeto.
Referências
Para obter mais informações, consulte o tópico "Consumidores de dados no Windows Forms" na documentação do Visual Studio 2005 ou Visual Studio .NET ajuda online.

Aviso: Este artigo foi traduzido automaticamente

Propriedades

ID do Artigo: 313640 - Última Revisão: 02/24/2014 12:54:30 - Revisão: 4.5

  • Microsoft Visual Basic 2005
  • Microsoft Visual Basic .NET 2003 Standard Edition
  • Microsoft Visual Basic .NET 2002 Standard Edition
  • kbnosurvey kbarchive kbmt kbvs2005swept kbvs2005applies kbhowtomaster KB313640 KbMtpt
Comentários