- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 求助 动态控件写入值到当前行的列 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=101031)
-- 发布时间：2017/5/23 22:52:00
-- 求助 动态控件写入值到当前行的列
老师：您好！
动态生成的控件，写入值到列，我在窗口事件TextChanged的代码是：
If e.Sender.Name Like "TextBox*" Then
Dim idx As Integer = e.Sender.Name.Replace("TextBox", "")
Tables("qrymyf").Position = idx
Dim r As Integer = idx
Dim k As Row = Tables("表A").Rows(r)("第一列")
e.Sender.WriteValue(k)
End If
提示：
此主题相关图片如下：1.png
请老师指教！谢谢！
我修改代码：
If e.Sender.Name Like "TextBox*" Then
Dim idx As Integer = e.Sender.Name.Replace("TextBox", "")
Tables("qrymyf").Position = idx
Dim k As Row = Tables("qrymyf").Rows(idx)
k("ymyfjgm") = e.Sender.WriteValue(idx)
End If
提示：
此主题相关图片如下：2.png
[此贴子已经被作者于2017/5/23 23:03:08编辑过]
-- 发布时间：2017/5/23 23:04:00
--
If e.Sender.Name Like "TextBox*" Then
Dim idx As Integer = e.Sender.Name.Replace("TextBox", "")
Tables("qrymyf").Position = idx
Tables("表A").Rows(idx )("第一列") = e.Sender.Text
End If
-- 发布时间：2017/5/23 23:46:00
--
谢谢老师！！！