以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  TextBox  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=193260)

--  作者:1234567
--  发布时间:2024/8/30 9:08:00
--  TextBox

If Forms ("生产管理").opened Then
Dim t1 As Table = Tables("生产管理_Table01")
Dim c As Col = t1.Cols(t1.ColSel)
 Forms ("申请人编辑").Controls("TextBox5").text = t1.Current(t1.ColSel)  把这句改成t1.Current(t1.ColSel) = Forms ("申请人编辑").Controls("TextBox5").text为什么不能运行?

End If


--  作者:有点蓝
--  发布时间:2024/8/30 9:14:00
--  
肯定没有问题的。不过代码执行前"TextBox5"文本框里有内容吗?
--  作者:1234567
--  发布时间:2024/8/30 9:27:00
--  

TextBox控件的ValueChanged事件

.NET Framework 版本:4.0.30319.1
Foxtable 版本:2022.8.18.1
错误所在事件:窗口,申请人编辑,TextBox5,ValueChanged
详细错误信息:
Public member \'text\' on type \'String\' not found.


--  作者:有点蓝
--  发布时间:2024/8/30 9:45:00
--  
调试技巧:http://www.foxtable.com/webhelp/scr/1485.htm,看哪一句代码出错
--  作者:1234567
--  发布时间:2024/8/30 9:58:00
--  

If Forms ("生产管理").opened Then
MessageBox.Show(1)                                             出现1
Dim t1 As Table = Tables("生产管理_Table01")
MessageBox.Show(2)                                             出现2
Dim c As Col = t1.Cols(t1.ColSel)
MessageBox.Show(3)                                              出现3  
  t1.Current(t1.ColSel) = Forms ("申请人编辑").Controls("TextBox5").text
MessageBox.Show(4)                                         出现4 但数据未被导入到TABLE

End If

[此贴子已经被作者于2024/8/30 10:01:38编辑过]

--  作者:有点蓝
--  发布时间:2024/8/30 10:08:00
--  
说明代码没有问题,事件触发的时候"TextBox5"没有数据
--  作者:1234567
--  发布时间:2024/8/30 10:42:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:多选目录树.zip


图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2024/8/30 11:03:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:多选目录树.zip


要注意,这使用下拉窗口的,窗口打开的时候单元格处于编辑状态,数据是不会变化的,要等窗口关闭

--  作者:1234567
--  发布时间:2024/8/30 11:06:00
--  
好的