Å vite hvordan man skal beregne kolonner i en Data Grid Vis kontroll ved hjelp av Microsoft Visual Basic.NET eller VB.NET , kan du spare tid når du trenger å beregne verdier og presentere dem for brukeren. En beregnet kolonne er resultatene av en beregning ved hjelp av verdier fra én kolonne eller flere kolonner . A Data Grid View kontroll viser data i et tabellformat. Ofte kontrollen brukes til å vise data fra en database tabell . I noen få skritt , kan du opprette en VB.NET prosjekt ved hjelp av et rutenett med data fra en Microsoft Office Access database. Du trenger
Microsoft Visual Basic Express & Northwind database
Vis flere instruksjoner
en

start Microsoft Visual Basic Express , klikk " Nytt prosjekt " på venstre ruten på skjermen og deretter velge " 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 . . Dobbeltklikk på " Button1 " for å åpne Form1.vb modulen

Skriv inn følgende i den første linjen i modulen : en

Import System.Data.OleDb

3

Skriv inn følgende under " button1_click " prosedyre for å erklære variabler : en

Dim oleC Som OleDbConnection

Dim sSQL As String

Dim datasett Som datasett

Dim newClmn Som DataColumn
4

Skriv inn følgende for å søke på tabellen Ordrer fra Northwind Access-database: .

sSQL = "Velg bestillinger * fra bestillinger ; "

oleC = Ny OleDbConnection _

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

Edit følgende linje med kode og skriv inn banen og navnet på Access- database:

Source = C: \\ Northwind 2007.accdb
5

skriv inn følgende for å lage og åpne tilkoblingen : en

Dim newOleConn Som OleDbConnection = Ny OleDbConnection

Dim da As OleDbDataAdapter

da = Ny OleDbDataAdapter ( sSQL , oleC )

datasettet = Ny datasettet

6

Skriv inn følgende for å fylle datasett : en

da.Fill ( datasettet, " Orders" )
7

Skriv inn følgende for å opprette ny beregnet kolonne og legge den i Data Grid View kontroll : en

newClmn = Ny DataColumn ( " TotalCost " , getType ( Dobbeltrom) )

newClmn.Expression = " [ Shipping Fee ] * 2 "

dataSet.Tables ( "Orders ") . Columns.Add ( newClmn )

Me.DataGridView1.DataSource = dataSet.Tables ( " Orders" )

newOleConn.Close ( )
8

Trykk " F5 " for å kjøre programmet . Klikk " Button1 " for å fylle Data Grid Vis kontroll.