以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助] 红色框内的代码错误在哪里??  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=60633)

--  作者:lmlptj
--  发布时间:2014/11/28 9:30:00
--  [求助] 红色框内的代码错误在哪里??


图片点击可在新窗口打开查看此主题相关图片如下:360截图20141128093039877.jpg
图片点击可在新窗口打开查看


Dim zd As String = e.Col.Name
If ZD In("性别","职务等级","军衔","人员类别","证件类别","文化程度")= True Then
    \'Dim EXP As String = CEXP("{0} = \'{1}\'",
    E.Col.ComboList = DataTables("词典").GetComboListString("名称","类别 = \'"& ZD & "\'","_Sortkey")
End If


这句代码怎么错误了??

--  作者:有点甜
--  发布时间:2014/11/28 9:39:00
--  
Select Case zd
    Case "性别","职务等级","军衔","人员类别","证件类别","文化程度"
       
End Select

 


--  作者:lmlptj
--  发布时间:2014/11/28 9:40:00
--  
有没有用 < In >来判断的语句??这个总不会用!
--  作者:有点甜
--  发布时间:2014/11/28 9:42:00
--  
 没有in的语法
--  作者:lmlptj
--  发布时间:2014/11/28 9:53:00
--  


图片点击可在新窗口打开查看此主题相关图片如下:360截图20141128093039877.jpg
图片点击可在新窗口打开查看


示例中咋有的咧??


--  作者:Bin
--  发布时间:2014/11/28 9:57:00
--  
表达式, 和 代码是不一样的哦.



--  作者:有点甜
--  发布时间:2014/11/28 10:02:00
--  
 不一样的,代码里没有