Å vite hvordan å lage en kul Grid grensesnitt kontroll kan gjøre programmet mer attraktivt og mer brukervennlig. Du kan bruke Visual Basic. NET til å opprette et prosjekt med en Data Grid Vis kontroll og endre utseendet. VB.NET er et objektorientert programmeringsspråk som brukes til å lage kraftige og dynamiske Windows-programmer . En Grid kontroll brukes ofte til å vise data i tabellform format som ligner på en database tabell . Du trenger
Microsoft Visual Basic Express
Vis flere instruksjoner
en

Åpne Microsoft Visual Basic Express, velg "New Project " på ruten til venstre på skjermen, og klikk deretter på "Windows Forms Application ". Klikk "OK".
2

Dobbeltklikk på " Button" på Toolbox -ruten for å legge til en ny knapp kontroll. Dobbeltklikk på " DataGridView " for å legge til et nytt rutenett kontroll . Høyreklikk Data Grid Vis kontroll og velg " Properties". Type " DG1 " ved siden av "Name ".
3

Dobbeltklikk på " Button1 " for å åpne Form1.vb modulen. Skriv inn følgende under " button1_click " for å erklære antall kolonner : en

dg1.ColumnCount = 2
4

Skriv inn følgende for å definere de to første kolonnene og sette noen egenskaper til " False : . " . . .
p Med DG1

RowHeadersVisible = False

Søyler ( 0 ) Name =" første kolonnen "

Søyler ( 1 ) . Name = "Andre Column"

. SelectionMode = DataGridViewSelectionMode.FullRowSelect

. MultiSelect = False

. Dock = DockStyle.Fill

End With

5

Skriv inn følgende for å legge til tre rader med data til data Grid visningskontroll :

Dim R0 As String ( ) = { " 12 " , " ipad "}

Dim r1 As String ( ) = { "24" , "mus "}

Dim r2 As String ( ) = { " 116 ", " Windows Phone 7 "}
p Med Me.dg1.Rows

. Legg til ( r0 )

. Legg til ( r1)

. Legg til ( r2)

End With

6

Skriv inn følgende for å formatere data rutenett Vis kontroller med kule farger , fonter og skriftstørrelser : . .
p Med Me.dg1.Rows

Element ( 1 ) Cells ( 1 ) . Style.BackColor = Color.Green

. Element ( 1) . Cells ( 1) . Style.Font = Ny Font ( " BlippoBlackEF " , 10 )

. vare ( . . 1) Cells ( 1 ) Style.ForeColor = Color.White

End With

Skriv inn følgende fryse kolonne en:

Me.dg1.Columns ( 1 ) Frozen = sant
7

Skriv inn følgende for å sortere den første kolonnen i stigende rekkefølge : .

Me.dg1.Sort ( Me.dg1.Columns ( 0 ) , System. ComponentModel.ListSortDirection.Ascending )

Klikk på " Debug "-menyen og velg "Start Debugging . " Klikk " Button1 . "