以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  求助 动态生成控件及动态绑定行,动态选定行  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=99952)
--  作者：jackyfashion
--  发布时间：2017/5/1 10:10:00
--  求助 动态生成控件及动态绑定行,动态选定行
您好!老师:节日快乐!
之前在您的指导下,知道动态增加控件及动态绑定行,

For  i As Integer=0 To Tables("qrymyf").rows.count-1

    Dim txt As WinForm.TextBox

    txt = e.Form.CreateControl("TextBox" & i, ControlTypeEnum.TextBox)

    txt.value = Tables("qrymyf").rows(i)("ffikgn")

    txt.Left = 100*i + 100

    txt.Top = 500

    e.Form.AddControl(txt)

Next

如果单击动态的控件,打开该行,请老师指教!!!谢谢!!!
--  作者：有点色
--  发布时间：2017/5/2 11:23:00
--  

去编写窗口的click事件

 

If e.Sender.Name Like "TextBox*" Then

    Dim idx As Integer = e.Sender.Name.Replace("TextBox", "")

    msgbox(idx)

    Tables("qrymyf").Position = idx

End If
--  作者：jackyfashion
--  发布时间：2017/5/2 22:31:00
--  
谢谢老师!!!
--  作者：jackyfashion
--  发布时间：2017/5/23 0:04:00
--  

您好！老师：

动态绑定行后，在动态控件输入文字能保存到对应行、列？

请老师指教！

 

      谢谢！
--  作者：有点色
--  发布时间：2017/5/23 9:21:00
--  

 也可以，你要写 e.Form.Controls("TextBox1").WriteValue

 

http://www.foxtable.com/webhelp/scr/2436.htm

 

http://www.foxtable.com/webhelp/scr/0731.htm