Veta hur man beräknar kolumner i en Data Grid View kontroll med Microsoft Visual Basic.NET , eller VB.NET , kan du spara tid när du behöver beräkna värden och presentera dem för användaren . En beräknad kolumn är resultatet av en beräkning med värden från en kolumn eller flera kolumner . En Data Grid View kontroll visar data i tabellformat . Ofta kontrollen används för att visa data från en databas tabell . I några få steg kan du skapa ett VB.NET projekt med hjälp av ett rutnät med data från en Microsoft Office Access-databas . Saker du behöver
Microsoft Visual Basic Express Review Northwind databas
Visa fler instruktioner
1
Starta Microsoft Visual Basic Express , klicka på " Nytt projekt " på vänster rutan på skärmen och välj sedan " 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 . . Dubbelklicka på " Button1 " för att öppna Form1.vb modulen
Skriv följande i den första raden i din modul :
Imports System.Data.OleDb
3
Skriv följande under " Button1_Click " förfarande för att deklarera dina variabler :
Dim oleC som OleDbConnection
Dim sSQL As String
Dim dataSet som dataSet
Dim newClmn som DataColumn
4
Skriv följande för att söka i tabellen Order från Northwind Access-databas : .
sSQL = "Välj Orders * från Order; "
oleC = Ny OleDbConnection _
( " Provider = Microsoft.ACE.OLEDB.12.0 , Data Source = C : \\ Northwind 2007.accdb ; " ) katalog
Redigera följande kodrad och ange sökvägen och namnet på din Access-databas :
Source = C : \\ Northwind 2007.accdb
5
skriv följande för att ringa och öppna förbindelsen :
Dim newOleConn Som OleDbConnection = Ny OleDbConnection
Dim da Som OleDbDataAdapter
da = Ny OleDbDataAdapter ( sSQL , oleC ) katalog
dataset = Ny dataSet
6
Skriv följande för att fylla datamängden :
da.Fill ( datamängd "Order " )
7
Skriv följande för att skapa den ny beräknad kolumn och lägga den i Data kontroll Grid View :
newClmn = ny DataColumn ( " TotalCost " , getType ( Dubbel ) ) katalog
newClmn.Expression = " [ Sändningsavgift ] * 2 "
dataSet.Tables ( "Order " ) . Columns.Add ( newClmn ) katalog
Me.DataGridView1.DataSource = dataSet.Tables ( "Order " ) katalog
newOleConn.Close ( )
8
Tryck " F5 " för att köra programmet . Klicka " Button1 " att fylla Data styrgallret View .
