以文本方式查看主题

-  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
--  
太感谢了!图片点击可在新窗口打开查看