以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]筛选  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=98448)

--  作者:苏州老街
--  发布时间:2017/3/30 9:05:00
--  [求助]筛选
老师,当在(DropBox1)框中输入数据时打开窗口并对该窗口表进行筛选。求助
--  作者:苏州老街
--  发布时间:2017/3/30 9:38:00
--  
好了.
--  作者:苏州老街
--  发布时间:2017/3/30 10:14:00
--  
老师,下拉链窗口表选中行的数据分别赋值给窗口2的文本框(第一列对应文本框1-第二列对应文本框2,,,,,,,,,,,,,)
--  作者:有点色
--  发布时间:2017/3/30 10:18:00
--  

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

 


--  作者:有点色
--  发布时间:2017/3/30 10:20:00
--  

最简单的代码你都还不会写?

 

Forms("窗口2").Controls("TextBox1").Text = Tables("窗口1_Table1").Current("第一列")

Forms("窗口2").Controls("TextBox2").Text = Tables("窗口1_Table1").Current("第二列")

 


--  作者:苏州老街
--  发布时间:2017/3/30 10:55:00
--  
老师,离开控件后就没有了。
--  作者:有点色
--  发布时间:2017/3/30 11:54:00
--  
 不明白你的意思,实例说明
--  作者:苏州老街
--  发布时间:2017/3/30 12:08:00
--  
以下是引用有点色在2017/3/30 10:20:00的发言:

最简单的代码你都还不会写?

 

Forms("窗口2").Controls("TextBox1").Text = Tables("窗口1_Table1").Current("第一列")

Forms("窗口2").Controls("TextBox2").Text = Tables("窗口1_Table1").Current("第二列")



赋值后保存不了。 


--  作者:有点色
--  发布时间:2017/3/30 12:37:00
--  

 如果控件绑定了表列。那就直接给表赋值

 

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

 


--  作者:苏州老街
--  发布时间:2017/3/30 13:56:00
--  
老师,没用啊。


Dim
 txt1 As WinForm.TextBox = e.Form.Controls("TextBox1")
MessageBox
.Show(Tables("A").Current("第一列"))