Saber como fazer um controle de interface de grade legal pode fazer a sua aplicação mais atraente e mais amigável. Você pode usar o Visual Basic. NET para criar um projeto com um controle Data Grid View e modificar sua aparência. VB.NET é uma linguagem de programação de computadores orientada a objeto usado para criar aplicativos do Windows poderosas e dinâmicas. Um controle de grade é freqüentemente usado para exibir dados em um formato tabular semelhante a uma tabela de banco de dados . Coisas que você precisa
Microsoft Visual Basic Express
Visualizar Mais instruções
1
Abra o Microsoft Visual Basic Express , selecione " New Project" no painel esquerdo da tela e em seguida, clique em " Windows Forms Application ". Clique em " OK".
2
Clique duas vezes em "Button" no painel de caixa de ferramentas para adicionar um novo controle de botão. Clique duas vezes em " DataGridView " para adicionar um novo controle de grade. Botão direito do mouse o controle Data Grid View e selecione " Propriedades". Digite " dg1 " ao lado de " Nome".
3
Clique duas vezes em "Button1 " para abrir o módulo Form1.vb. Digite o seguinte em " Button1_Click " para declarar o número de colunas :
dg1.ColumnCount = 2
4
Digite o seguinte para definir as duas primeiras colunas e definir algumas propriedades para " Falso: ". . . .
Com dg1
RowHeadersVisible = False
Colunas (0) Nome =" Primeira Coluna "
Colunas (1) . Name = " Segunda Coluna "
. SelectionMode = DataGridViewSelectionMode.FullRowSelect
. MultiSelect = False
. Doca = DockStyle.Fill
End With
5
Digite o seguinte para adicionar três linhas de dados para o controle de dados Grid View :
Dim r0 as String () = {" 12 ", " ipad "}
Dim r1 As String () = {" 24", "mouse" }
Dim r2 As String () = { " 116 ", " Windows Phone 7 "}
Com Me.dg1.Rows
. Add ( R0)
. Add ( R1)
. Add ( r2)
End With
6
Digite o seguinte para formatar seu Data Grid View controles com cores frias , fontes e tamanhos de fonte : . .
com Me.dg1.Rows
item ( 1) células (1). Style.BackColor = Color.Green
. item ( 1). Cells ( 1). Style.Font = New Font ( " BlippoBlackEF " , 10)
. item ( . . 1 ) células (1) Style.ForeColor = Color.White
End With
Digite o seguinte para congelar coluna um :
Me.dg1.Columns ( 1 . ) Congelado = True
7
Digite o seguinte para classificar a primeira coluna em ordem crescente :
Me.dg1.Sort ( Me.dg1.Columns (0) , o Sistema . ComponentModel.ListSortDirection.Ascending )
Clique no menu " Debug " e selecione " Start Debugging . " Clique em " Button1 ".
