以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  包含列标题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=113416)

--  作者:良才
--  发布时间:2018/1/15 17:16:00
--  包含列标题
 Dim t As Table = e.Form.controls("Table1").Table
Select Case t.Cols.Contains.Name
        Case "学期","班级","学生姓名"
            Dim trv As WinForm.TreeView = Forms("共有窗体").Controls("TreeView2")
            trv.BuildTree("学生缴费_Table1", "学期|班级|学生姓名")
End Select
请指教,谢谢

--  作者:有点甜
--  发布时间:2018/1/15 17:18:00
--  

Select Case 不能模糊匹配。

 

请改成 If Else End If 的语法。


--  作者:良才
--  发布时间:2018/1/15 19:35:00
--  
老师是这样吗?
If t.Cols.Contains("学期") And t.Cols.Contains("班级") And t.Cols.Contains("学生姓名")  Then
[此贴子已经被作者于2018/1/15 19:47:17编辑过]

--  作者:有点蓝
--  发布时间:2018/1/15 20:17:00
--  
可以。测试有问题么
--  作者:良才
--  发布时间:2018/1/15 21:08:00
--  
没有,谢谢
--  作者:有点甜
--  发布时间:2018/1/16 9:13:00
--  

如果是满足任意一个都成立,就要用 OrElse

 

If t.Cols.Contains("学期") OrElse t.Cols.Contains("班级") OrElse t.Cols.Contains("学生姓名")  Then

 

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

 


--  作者:良才
--  发布时间:2018/1/16 10:38:00
--  
谢谢