Gewusst wie: Erstellen eines Datasets von Gridview

February 21

Erstellen ein DataSet aus einem DataGridView-Steuerelement in Visual Basic (VB) kann ein Problem sein, wenn Sie nicht wissen, wie DataSets verwendet. Ein DataSet ist ein Satz von Daten im Arbeitsspeicher. Ein DataSet kann temporäre Tabellen im Speicher halten und Sie können diese Tabellen zugreifen, Name oder mithilfe einer Indexnummer. Füllen das DataSet aus dem DataGridView-Steuerelement kann durch die erste Lektüre der Spalten mithilfe der Klasse "DataColumn" und "DataRow"-Klasse erfolgen.

Anweisungen

1 Starten Sie Microsoft Visual Studio zu, klicken Sie auf "Neues Projekt" im linken Bereich Ihres Bildschirms. Erweitern Sie "Visual Basic" unter "Installierte Vorlagen" zu, und klicken Sie auf "Windows". Doppelklicken Sie auf "Windows Forms-Anwendung" aus der Mitte des Dialogfensters auf ein neues Windows Forms-Projekt erstellen.

2 Blättern Sie in der Toolbox-Bereich im linken Fensterbereich von Ihrem Computerbildschirm und doppelklicken Sie auf "DataGridView" es zu Ihrem Formular hinzu. Doppelklicken Sie auf "Button", um eine neue Schaltfläche zum Formular hinzufügen.

3 Doppelklicken Sie auf das Formular, um eine Load-Ereignis des Formulars erstellen, und fügen Sie folgenden Code zum Hinzufügen von Daten an das DataGridView-Steuerelement:

Dim gRw AsString() = {"0", "Shirt"}

Dim gRw1 As String() = {"1", "Pants"} Dim gRw2 As String() = {"2", "Socks"} Dim gRw3 As String() = {"3", "Skirt"} DataGridView1.ColumnCount = 2 With DataGridView1 .RowHeadersVisible = False .Columns(0).Name = "ID" .Columns(1).Name = "Clothing" End With With Me.DataGridView1.Rows .Add(gRw) .Add(gRw1) .Add(gRw2) .Add(gRw3) End With4

Wechseln Sie wieder zur Formulardesign und doppelklicken Sie auf "Button1" ein Click-Ereignis für die Schaltfläche erstellen. Kopieren Sie und fügen Sie den folgenden Code zum Erstellen eines Datasets und füllen es mit Daten aus dem DataGridView-Steuerelement:

Dim dSet neues DataSet

dSet.Tables.Add("table") Dim clm As System.Data.DataColumn For Each ClmDGV As DataGridViewColumn In Me.DataGridView1.Columns clm = New System.Data.DataColumn(ClmDGV.Name) dSet.Tables("table").Columns.Add(clm) Next

Dim dRow As System.Data.DataRow Dim clmCnt As Integer = Me.DataGridView1.Columns.Count - 1 For iCnt As Integer = 0 To Me.DataGridView1.Rows.Count - 1 dRow = dSet.Tables("table").Rows.Add For Each fieldClmn As DataGridViewColumn In Me.DataGridView1.Columns dRow.Item(fieldClmn.Index) = Me.DataGridView1.Rows.Item(iCnt).Cells(fieldClmn.Index).Value Next Next5

Drücken Sie "F5", um das Programm ausführen, und klicken Sie auf "Button1."