以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 单选框代码,如何应用在当前行 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=52877) |
-- 作者:dengzhihao -- 发布时间:2014/6/24 22:46:00 -- 单选框代码,如何应用在当前行 Dim dr As Row = Tables("重型推拉主表.重型推拉副表").AddNew() For i As Integer = 1 To 2 If e.Form.Controls("RadioButton" & i).Checked Then dr("窗扇叶数") = e.Form.Controls("RadioButton" & i).Text Exit For End If Next 这代码总是将所选的应用到新增的行当中,请教,如何将所选的,应用到当前行!
|
-- 作者:有点甜 -- 发布时间:2014/6/24 22:47:00 -- Dim dr As Row = Tables("重型推拉主表.重型推拉副表").Current
For i As Integer = 1 To 2
If e.Form.Controls("RadioButton" & i).Checked Then
dr("窗扇叶数") = e.Form.Controls("RadioButton" & i).Text
Exit For
End If
Next
|
-- 作者:dengzhihao -- 发布时间:2014/6/24 22:48:00 -- 太感谢了! |