Vide, hvordan man beregner kolonner i en Data Grid View styring ved hjælp af Microsoft Visual Basic.NET eller VB.NET , kan du spare tid, når du har brug for at beregne værdier og præsentere dem for brugeren. En beregnet kolonne er resultatet af en beregning med værdier fra en kolonne eller flere kolonner . Et Data Grid View kontrol viser data i et tabelformat . Ofte kontrollen bruges til at vise data fra en database tabel . I et par trin, kan du oprette en VB.NET projekt ved hjælp af et gitter med data fra en Microsoft Office Access -database. Ting du skal
Microsoft Visual Basic Express & Northwind database
Vis Flere Instruktioner
1
Start Microsoft Visual Basic Express , klik på " Nyt projekt " til venstre rude på skærmen og derefter vælge "Windows Forms Application ". Klik på "OK".
2
Dobbeltklik på " Button " på Toolbox ruden for at tilføje en ny knap kontrol. Dobbeltklik på " DataGridView " for at tilføje en ny tavle kontrol. . Dobbeltklik på " Button1 " for at åbne Form1.vb modulet
skrive følgende i den første linje i dit modul : Hej
Import System.Data.OleDb
< br > 3
Skriv følgende under " Button1_Click " procedure for at erklære dine variabler : Hej
Dim oleC Som OleDbConnection
Dim sSQL As String
Dim datasættet dataSet
Dim newClmn Som DataColumn
4
Skriv følgende for at søge i tabellen Ordrer fra Northwind Access-database: .
sSQL = "Vælg Orders * FROM Orders; "
oleC = Ny OleDbConnection _
( " Provider = Microsoft.ACE.OLEDB.12.0 , datakilde = C: \\ Northwind 2007.accdb ; ")
Edit følgende linje kode og skrive stien og navnet på din Access-database : Hej
Source = C: \\ Northwind 2007.accdb
5
Skriv følgende at foretage og åbne forbindelsen : Hej
Dim newOleConn Som OleDbConnection = Ny OleDbConnection
Dim da Som OleDbDataAdapter
da = Ny OleDbDataAdapter ( sSQL , oleC )
datasæt = Ny dataSet < br >
6
Skriv følgende for at fylde datasættet : Hej
da.Fill ( datasæt "Ordrer " )
7
Skriv følgende for at oprette nye beregnede kolonne og føje den data Grid View kontrol : Hej
newClmn = Ny DataColumn ( " TotalCost " getType (Dobbeltværelse) )
newClmn.Expression = " [ Leveringsomkostning ] * 2" Salg
dataSet.Tables ( " ordrer "). Columns.Add ( newClmn )
Me.DataGridView1.DataSource = dataSet.Tables ( " ordrer " )
newOleConn.Close ()
8
Tryk på " F5 " for at køre dit program. Klik på " Button1 " at fylde data Netoversigt kontrol.