以文本方式查看主题 -  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp) --  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2) ----  [求助]窗口中有一个TextBox和表，双击表列给TextBox赋值  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=173063)

--  作者：王小风 --  发布时间：2021/11/13 8:39:00 --  [求助]窗口中有一个TextBox和表，双击表列给TextBox赋值 这个代码无效，大佬们帮忙看看这个怎么写 Dim txt1 As String=e.Form.controls("TextBox1").text Dim tb As Row=e.Row If e.Col.Name="订单信息_订单号" Then txt1=tb("订单信息_订单号") End If

--  作者：fanjq8686 --  发布时间：2021/11/13 8:50:00 --   Dim tb As Row = Tables("订单管理窗口_Table1").Current

--  作者：王小风 --  发布时间：2021/11/13 8:57:00 --   此代码无效，我是在表的事件中写的代码。双击订单号 无报错 textbox也无赋值

--  作者：有点蓝 --  发布时间：2021/11/13 9:03:00 --   If e.Col.Name="订单信息_订单号" Then e.Form.controls("TextBox1").text = e.Row("订单信息_订单号") End If

--  作者：王小风 --  发布时间：2021/11/13 9:25:00 --   受教了  。原理应该和我写的 一样，  但是不知道为什么我写的不行，难道这里不能定义变量？很奇怪的问题！！！

--  作者：有点蓝 --  发布时间：2021/11/13 9:37:00 --   只是赋值给变量，又没有给控件赋值，有啥用。变量和控件是2个不同的东西 txt1=tb("订单信息_订单号") e.Form.controls("TextBox1").text = txt1

--  作者：王小风 --  发布时间：2021/11/13 10:08:00 --   谢谢 受教了