Vb.net 如何按照用户在文本框中的定义多次将datarow添加到表中?
我在vb.net项目中创建了一个Vb.net 如何按照用户在文本框中的定义多次将datarow添加到表中?,vb.net,datagridview,datatable,datarow,Vb.net,Datagridview,Datatable,Datarow,我在vb.net项目中创建了一个datatable,而datatable是datagridview的datasource 当用户单击名为btnAdd的按钮时,datarow将添加到datatable中。对于一个数据行,我可以如下所示。但是还有另一个名为“txtQuantity”的文本框用于项目数量,用户可以在其中键入任何数字。所以我的问题是,我如何才能像用户在txtQuantity中提到的那样多次向datatable添加相同的datarow Dim dr As DataRow = dtO
datatable
,而datatable
是datagridview
的datasource
当用户单击名为btnAdd
的按钮时,datarow将添加到datatable中。对于一个数据行,我可以如下所示。但是还有另一个名为“txtQuantity
”的文本框用于项目数量,用户可以在其中键入任何数字。所以我的问题是,我如何才能像用户在txtQuantity中提到的那样多次向datatable添加相同的datarow
Dim dr As DataRow = dtOrderingItem.NewRow
dr("ItemCode") = clckdItemCode
dr("ItemName") = clickdItemName
dr("ServiceCode") = srvc
dr("RatePerItem") = txtItemRate.Text
dtOrderingItem.Rows.Add(dr)
dgvCart.datasource=dtOrderingItem
使用Integer.TryParse()
将文本框中的值转换为整数,然后按照SSS的建议在For
循环中使用该值
Dim number As Integer
If Integer.TryParse(txtQuantity.Text, number) Then
If number >= 1 Then
Dim dr As DataRow = dtOrderingItem.NewRow
dr("ItemCode") = clckdItemCode
dr("ItemName") = clickdItemName
dr("ServiceCode") = srvc
dr("RatePerItem") = txtItemRate.Text
For i As Integer = 1 To number
dtOrderingItem.Rows.Add(dr)
Next
dgvCart.datasource = dtOrderingItem
End If
End If
你能为下一个循环使用
吗?@SSS,是的,我按照你的建议做了。谢谢你的支持:)谢谢你的支持。有你们的支持,我也可以通过这一步。。。竖起大拇指