以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]代码报错  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=126920)

--  作者:swimmer01
--  发布时间:2018/10/30 21:23:00
--  [求助]代码报错
老师,下面代码运行报错:“从字符串“项目团队”到类型“Long”的转换无效。”是啥原因,烦请指正,谢谢!
Select Case e.Node.text
    Case "项目团队" Or "设计团队" Or "控制团队" Or "采购团队" Or "施工团队" Or "开车团队" Or "QHSE团队" Or "财务团队"
        _Sys_lsb2="项目组织"
        Forms("项目策划").Open()
    Case "项目输入"
        _Sys_lsb2="项目输入"
        Forms("项目策划").Open()
  。。。。
        
End Select

当然可以用笨办法解决,但感觉代码不简练

--  作者:swimmer01
--  发布时间:2018/10/30 21:29:00
--  
好像解决了
Select Case e.Node.text
    Case "项目团队",。。。"财务团队"
        _Sys_lsb2="项目组织"
        Forms("项目策划").Open()
    Case "项目输入"
        _Sys_lsb2="项目输入"
        Forms("项目策划").Open()
  。。。。
        
End Select