この手順は、xsdファイル内にあります。
Public Shared Sub AddRowData(ByVal sender As Object, ByVal e As System.EventArgs)
Dim myDataCol As DataColumn
Dim myDataRow As DataRow
Dim ordTable As New DataTable
Dim newDataRow As DataTable.orderDataRow
Dim myDataset As New DataSet("orderData")
Try
ordTable.AllowAddNew = True
newDataRow = ordTable.NewRow
ordTable.orderData.Rows.Add(PrintContents(0),
PrintContents(1),
PrintContents(2),
PrintContents(3),
PrintContents(4),
PrintContents(5),
PrintContents(6))
Catch ex As Exception
MessageBox.Show(ex.Message, "AddRowData")
End Try
End Sub
プロシージャを終了する前に、DataSet行をチェックしていて、変数がそこにあることを確認します。
次のステップでは、相対レポートを表示しているフォームに移動します。
Lastフォームには、Loadイベントのみがあり、他には何もありません。
行はありません。