Att veta hur man gör en cool kontroll Grid gränssnitt kan göra din ansökan mer tilltalande och mer användarvänlig . Du kan använda Visual Basic . NET för att skapa ett projekt med en Data Grid View kontroll och ändra dess utseende och känsla . VB.NET är ett objektorienterat dator programmeringsspråk som används för att skapa kraftfulla och dynamiska Windows-program . Ett rutnät kontroll används ofta för att visa data i tabellform som liknar en databas tabell . Saker du behöver
Microsoft Visual Basic Express
Visa fler instruktioner
1
Öppna Microsoft Visual Basic Express , välj " Nytt projekt " i den vänstra rutan på skärmen och klicka sedan på " Windows Forms Application . " Klicka på " OK . "
2
Dubbelklicka på " knappen " på Toolbox rutan för att lägga till en ny knapp kontroll . Dubbelklicka på " DataGridView " för att lägga till ett nytt rutnät kontroll . Högerklicka på Data styrgallret Visa och välj " Egenskaper . " Typ " DG1 " bredvid " Namn . " Addera 3
Dubbelklicka på " Button1 " för att öppna Form1.vb modulen . Skriv följande under " Button1_Click " att deklarera antalet kolumner :
dg1.ColumnCount = 2
4
Skriv följande för att definiera de två första kolumnerna och ange några egenskaper " falskt: . " . . .
DG1
RowHeadersVisible = False
Kolonner ( 0 ) name =" första kolumnen "
Columns ( 1 ) . Name = " andra kolumnen "
. SelectionMode = DataGridViewSelectionMode.FullRowSelect
. MultiSelect = False
. Dock = DockStyle.Fill
avslutas med
5
Skriv följande för att lägga till tre rader med data till Data Grid View kontroll :
Dim R0 As String () = { " 12 " , " iPad " }
Dim r1 As String ( ) = { " 24 " , " mus " }
Dim r2 As String ( ) = { " 116 " , " Windows Phone 7 " }
Me.dg1.Rows
. Lägg ( r0 ) katalog
. Lägg ( r1 ) katalog
. Lägg ( r2 ) katalog
End With
6
Skriv följande för att formatera dina data kontroller Grid View med svala färger , teckensnitt och teckenstorlekar : . .
Me.dg1.Rows
Produktfamilj ( 1 ) Celler ( 1 ) . Style.BackColor = Color.Green
. punkt ( 1 ) . Celler ( 1 ) . Style.Font = nytt teckensnitt ( " BlippoBlackEF " , 10 ) katalog
. punkt ( . . 1 ) Cells ( 1 ) Style.ForeColor = Color.white
End With
Skriv följande för att frysa kolumn ett :
Me.dg1.Columns ( 1 ) Fryst = Sant
7
Skriv följande för att sortera den första kolumnen i stigande ordning : .
Me.dg1.Sort ( Me.dg1.Columns ( 0 ) , System . ComponentModel.ListSortDirection.Ascending ) katalog
Klicka på " Debug " -menyn och välj "Start Debugging . " Klicka på " Button1 . " Addera
