La creazione di un DataSet da un controllo DataGridView in Visual Basic.NET (VB.NET) può essere un problema se non si sa come utilizzare DataSet. Un DataSet è un insieme di dati presenti in memoria. Un DataSet può contenere tabelle temporanee in memoria ed è possibile accedere a tali tabelle in base al nome o utilizzando un numero di indice. Riempire il DataSet dal controllo DataGridView può essere fatto prima lettura delle colonne utilizzando la classe "DataColumn" e la classe "DataRow".

istruzione

1 Avviare Microsoft Visual Studio, fare clic su "New Project" dal riquadro di sinistra dello schermo del computer. Espandere "Visual Basic" al di sotto "Modelli installati" e fare clic su "Windows". Fare doppio clic su "Applicazione Windows Form" dal centro della finestra di dialogo per creare un nuovo progetto Windows Form.

2 Scorrere verso il basso del riquadro Casella degli strumenti dal riquadro a sinistra dello schermo del computer e "DataGridView" doppio clic per aggiungerlo al form. Fare doppio clic su "Pulsante" per aggiungere un nuovo pulsante al form.

3 Fare doppio clic sul form per creare un evento carico di modulo e aggiungere il seguente codice per aggiungere dati al controllo DataGridView:

Dim GRW As String () = { "0", "camicia"}

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 With

4 Tornare a formare la progettazione e fare doppio clic su "Button1" per creare un evento click per il pulsante. Copiare e incollare il seguente codice per creare un DataSet e riempirlo con i dati del controllo DataGridView:

Dim DSET come nuovo 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 Come System.Data.DataRow
Dim clmCnt As Integer = Me.DataGridView1.Columns.Count - 1
Per iCnt As Integer = 0 Per Me.DataGridView1.Rows.Count - 1
Drow = dSet.Tables (& quot; tabella & quot;) Rows.Add.
Per ogni fieldClmn Come DataGridViewColumn In Me.DataGridView1.Columns
dRow.Item (fieldClmn.Index) = Me.DataGridView1.Rows.Item (iCnt) .Cells (fieldClmn.Index) .Value
Il prossimo
Il prossimo

5 Premere il tasto "F5" per eseguire il programma e fare clic su "Button1".