これは私がこんなに短い期間でできる最善のことなので、私を憎まないでください:
http://www.fileswap.com/dl/KusycS0QTC/
基本的には、MDI親フォームと2つの子フォームを持つプロジェクトです。それぞれにDGVがあり、あるフォームから別のフォームに情報を転送します。セットアップを説明するために必要な編集を行う必要がありますが、それで、自分が何を求めているのかを理解するのに十分なはずです。
編集:
考えられる変更:
Dim _Name As String = ""
Dim _Last As String = ""
For Each xRow In MasterForm.oTransferRows
_Name = xRow.Cells("GVName").Value.ToString()
_Last = xRow.Cells("GVLast").Value.ToString()
'次の行を挿入する必要がありますか?
Dim _sqlInsert As String = String.Format("Insert testing(Name, LastName) Values (@iName, @iLast)")
Using conn As New SqlClient.SqlConnection("Server = localhost; Username= root; Password =; Database = test")
Using cmd
With cmd
MsgBox("Connection Established")
.Connection = conn
.Parameters.Clear()
'Create Insert Query
.CommandText = _sqlInsert
.Parameters.Add(New SqlParameter("@iName", _Name))
.Parameters.Add(New SqlParameter("@iLast", _Last))
End With
Try
conn.Open()
Me.Validate()
cmd.ExecuteNonQuery()
Catch ex As Exception
MsgBox(ex.Message.ToString())
End Try
End Using
End Using
Next