以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  创建目录树时的筛选条件  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=100618)

--  作者:xvkewen
--  发布时间:2017/5/15 12:23:00
--  创建目录树时的筛选条件

这个代码哪里错了?怎么改

 

Dim tb_srs As WinForm.TextBox = e.Form.Controls("TB_SRSNO")
Dim tv As WinForm.TreeView = Forms("WorkProcessSchdule").Controls("TreeView1")
tv.BuildTree("ProcessSchdule","SamplePart","SrsNo = \'" & tb_srs & "\'")

 


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

 

 


--  作者:有点色
--  发布时间:2017/5/15 14:40:00
--  

 

Dim tb_srs As WinForm.TextBox = e.Form.Controls("TB_SRSNO")
Dim tv As WinForm.TreeView = Forms("WorkProcessSchdule").Controls("TreeView1")
tv.BuildTree("ProcessSchdule","SamplePart","SrsNo = \'" & tb_srs.Text & "\'")