Å vite hvordan du konfigurerer et rutenett kontroll i Microsoft Visual Basic.NET eller VB.NET , kan hjelpe deg å lage fleksible Windows-programmer . Et rutenett kontroll kan brukes på forskjellige måter, for eksempel visning av data fra en database eller bare lasting av data dynamisk. Et rutenett kontroll viser data i tabellform format som ligner på en database tabell . VB.NET gir programmereren fleksibilitet til å også legge avmerkingsbokser til en kolonne for ytterligere data manipulasjon . Du kan konfigurere et rutenett kontroll programmatisk ved hjelp av VB.NET . Instruksjoner
en

start Microsoft Visual Basic Express , klikk " Nytt prosjekt " på ruten til venstre på skjermen , og velg deretter "Windows Forms Application ". Klikk "OK".
2

Dobbeltklikk på " Button" på " Toolbox" -panelet for å legge til en ny knapp kontroll. Dobbeltklikk på " DataGridView " for å legge til et nytt rutenett kontroll . Høyreklikk på " DataGridView "-kontroll, velg " Rediger kolonner " for å åpne "Legg Column " Window . Klikk på " Legg til".
3

Velg " DataGridViewCheckBoxColumn " ved siden av "Type : " klikk " Add" for å legge den første kolonnen som en avmerkingsboks kolonne. Klikk på " Close".
4

Dobbeltklikk på " Button1 " for å åpne " Form1.vb " modulen. Skriv inn følgende i den første linjen i programmet : en

Import System.Data.OleDb
5

Kopier og lim inn følgende under " button1_click " for å lage en database tilkobling :

Dim myConString As String

myConString = " Provider = Microsoft.ACE.OLEDB.12.0 ; datakilde = C: \\ Northwind 2007.accdb "

Dim connOledb Som OleDbConnection = Ny OleDbConnection

Rediger følgende linje med kode og skriv inn banen og navnet på databasen : en

C: \\ Northwind 2007.accdb
6

skriv inn følgende til erklære din data adapter og data sett variabler :

Dim Dadapter Som OleDbDataAdapter

Dim DAngi Som datasett
7

Skriv inn følgende for å søke på " Ansatte " tabell:

connOledb.ConnectionString = myConString

Dadapter = Ny OleDbDataAdapter ( " utvalgte ansatte * fra ansatte ; . " , connOledb )

Rediger følgende tekst og skriv ditt spørsmål:

utvalgte ansatte * fra ansatte ;
8

Skriv inn følgende for å hente dataene fra spørringen og legge den til Data Grid View kontroll: .

DAngi = nye datasett

Dadapter.Fill ( DAngi , " ansatte " )
p Med Me.DataGridView1

. DataSource = DSet.Tables ( " ansatte")
< p > End With

connOledb.Close ( )
9

Skriv inn følgende for å endre font og farge egenskaper data Grid Vis kontroll : en

With Me . DataGridView1

. bakgrunnsfarge = Color.Azure

. ForeColor = Color.Black

End With
p Med Me.DataGridView1.Rows
< p > . Element ( 1) . Cells ( 2 ) . Style.BackColor = Color.Green

. Element ( 1) . Cells ( 2). Style.ForeColor = Color.White

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

End With