以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 为什么这么简的一段代码执行不了??? (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=69612) |
||||
-- 作者:lmlptj -- 发布时间:2015/6/8 10:22:00 -- 为什么这么简的一段代码执行不了??? 为什么这么简的一段代码执行不了??? 设计了如图所示的目录树,在AfterSelectNode事件中有如下代码,无论在目录树里如何点选,就是显示不了变量filt的值???? 目录树: 代码: Dim sts() As String = e.Node.FullPath.Split("\\") Dim filt As String = "select * f rom {员工资料} " Select Case e.Node.Level Case e.Node.Level = 0 If e.Node.Text <> "显示所有员工" Then filt = filt & " where 部门 = \'" & sts(0) & "\'" MessageBox.Show(filt) End If End Select
|
||||
-- 作者:Bin -- 发布时间:2015/6/8 10:25:00 -- 没有数据源.打不开你的例子进行测试呢. 你调试一下看看.是那个IF条件没有进入.
|
||||
-- 作者:y2287958 -- 发布时间:2015/6/8 10:26:00 -- Case e.Node.Level = 0 没有这种写法
|
||||
-- 作者:Bin -- 发布时间:2015/6/8 10:32:00 -- Case 0 Case e.Node.Level = 0 这样写系统可能会当作True 也就是1 来处理.
|
||||
-- 作者:lmlptj -- 发布时间:2015/6/8 10:39:00 -- 确实是犯了低级错误!!应该是 case 0 case 1 …………………… |