窗口中有个TabControl,页签第一页的选中框的数据,点击提交完了以后就可以正常提交到表格中,但是第二页的选中框的数据就提交不进去了,点击提交没反应,是为什么啊?
提交按钮事件代码如下:
For i As Integer = 1 To 18
Dim chk As WinForm.CheckBox = e.Form.Controls("CheckBox" & i)
If chk.Checked Then
Dim dr As DataRow = DataTables("info").Find("名称='" & chk.Text & "'")
If dr IsNot Nothing Then
Dim r As Row = Tables("team_hotel_info").AddNew
r("编号") = e.form.controls("textbox1").Text
r("名称") = dr("名称")
r("价格") = dr("价格")
r("数量") = e.form.controls("textbox4").Text
End If
End If
Next