Weten hoe je een raster controle configureren in Microsoft Visual Basic.NET of VB.NET , kan je helpen om flexibele Windows-toepassingen . Een raster controle kan gebruikt worden op verschillende manieren , zoals het weergeven van gegevens uit een database of gewoon laden van gegevens dynamisch . Een raster controle toont gegevens in tabel formaat vergelijkbaar met een database tabel . VB.NET geeft de programmeur de flexibiliteit om ook dozen op een kolom voor verdere data manipulatie toe te controleren . U kunt een raster controle programmatisch met behulp van VB.NET configureren . Instructies
1 Start Microsoft Visual Basic Express , klikt u op " New Project" aan de linkerkant van uw scherm , selecteer " Windows Forms Application . " Klik op "OK . "
Dubbelklik op " Button " 2 op de " Toolbox " deelvenster naar een nieuwe knop controle toe te voegen . Dubbelklik op " DataGridView " om een nieuw raster controle toe te voegen . Rechts - klik op de " DataGridView " control , selecteer "Edit Kolommen " op de " Add Column ' Window openen . Klik op ' Toevoegen '.
3 Selecteer " DataGridViewCheckBoxColumn " naast " Type : " klik op "Add" om de eerste kolom als een selectievakje kolom toe te voegen . Klik op ' Sluiten '.
4 Dubbelklik op " Button1 " om de " Form1.vb " module te openen . Typ het volgende in de eerste regel van uw programma : Imports System.Data.OleDb
Copy
5 en plak de volgende onder " Button1_Click " om een database verbinding te maken : < br Dim myConString > As String
myConString = " Provider = Microsoft.ACE.OLEDB.12.0 ; data Source = C : \\ Noordenwind 2007.accdb " Dim connOledb
Zoals OleDbConnection = Nieuw OleDbConnection
Bewerk de volgende regel code en typ het pad en de naam van uw database :
C : \\ Northwind 2007.accdb
Type 6 het volgende aan verklaren uw data adapter en data set variabelen : Dim Dadapter
Zoals OleDbDataAdapter Dim DStel
Zoals dataSet
Type 7 het volgende aan de " Werknemers " table opvragen:
connOledb.ConnectionString = myConString
Dadapter = Nieuw OleDbDataAdapter ( " select * Werknemers van medewerkers ; . " , connOledb ) op Twitter Bewerk de volgende tekst en typ uw zoekopdracht: < br select Medewerkers * van Medewerkers> ;
Type 8 het volgende om de gegevens van de query ophalen en voeg deze toe aan de data Grid View controle : . DStel
= nieuwe DataSet Dadapter.Fill
( DStel , " Werknemers " ) op p Met Me.DataGridView1
. DataSource = DSet.Tables ( " Werknemers " ) op Twitter End With connOledb.Close
( )
type 9 de volgende om het lettertype en de kleur eigenschappen van de data Grid View controle veranderen :
With Me . DataGridView1
. = Color.Azure
. ForeColor = Color.Black End met
Met Me.DataGridView1.Rows
. Item ( 1 ) . Cells ( 2 ) . Style.BackColor = Color.Green
. artikel ( 1 ) . Cells ( 2 ) . Style.ForeColor = Color.white
. item (1 ) . Cells ( 1 ) . Style.Font = New Font ( " BlippoBlackEF " , 10 ) Einde
met
|
