VB .NET - Power Packs - Usando DataRepeater
Você já conhece o Visual Basic Power Packs ?
Ainda não ???
Pois bem, o Visual Basic Power Packs são um conjunto de Add-Ins, Controles, Componentes e ferramentas grátis para você usar com o Visual Basic com o objetivo de tornar o desenvolvimento mais fácil.
Existem as seguintes versões disponíveis para download:
Microsoft Visual Basic 2005 Power Packs 2.0 - Possui os controles Line e Shape , o componente PrintForm e a library Printer Compatibility
Microsoft Visual Basic Power Packs 3.0 - Inclui o novo controle DataRepeater que permite exibir em formulários Windows linhas de dados em um container com navegação vertical e as versões atualizadas dos controles Line, Shape, PrintForm e da livraria Print Compatibility.
Neste artigo eu vou mostrar como usar o componente DataRepeater presente no Power Packs 3.0.
Para o exemplo deste artigo eu estou usando o Visual Studio 2008 na versão Trial.
Abra o VS 2008 e crie uma novo projeto do tipo Windows Forms Application com o nome usandoDataRepeater;
Selecione o formulário form1.vb criado por padrão e procure na ToolBox a guia Visual Basic Power Packs 3.0;
Expandindo a guia você verá os controles instalados; Selecione o controle DataRepeater e arraste-o até o formulário, conforme a figura;
Devemos criar agora um Data Source via menu Data -> Add New Data Source;
Selecione a opção DataBase e a seguir defina uma conexão com o banco de dados Northwind.mdf;
Clique em Next> e selecione a tabela Employees alterando o nome do dataset para EmployeesDataSet;
Após isso vamos seleciona alguns campos do dataset e arrastar até o controle DataRepeater :
Ao final o leiaute deverá parecer com o da figura abaixo:
Podemos ainda definir alguma configurações para o controle conforme a figura:
Executando o projeto iremos obter:
Se você desejar pode também alterar a cor de fundo dos itens exibidos pelo DataRepeater , para isso vamos usar o evento DrawItem do controle usando o seguinte código:
Private Sub DataRepeater1_DrawItem(ByVal sender As System.Object, ByVal e As Microsoft.VisualBasic.PowerPacks.DataRepeaterItemEventArgs) Handles DataRepeater1.DrawItem If e.DataRepeaterItem.ItemIndex Mod 2 = 0 Thene.DataRepeaterItem.BackColor = Color.AntiqueWhite Elsee.DataRepeaterItem.BackColor = Color.Aqua End If End Sub |
Executando teremos:
Você pode explorar outros eventos como o PositionChanged que permite controlar em qual linha do item estamos acessando e assim por diante...
Fique a vontade para explorar outros controles do Power Pack; certamente o farei em futuros artigos.
Pegue o projeto completo aqui: usandoDataRepeater.zip
Eu sei é apenas VB.NET mas eu gosto.
Até o próximo artigo...
José Carlos Macoratti