以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  代码请教  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=44856)

--  作者:Bin
--  发布时间:2014/1/10 12:18:00
--  
not In ("asd","df","dfg","fh")  没有这样的写. 这个是表达式的语法.

代码和表达式是不一样的.只能一个个判断.

--  作者:Bin
--  发布时间:2014/1/10 14:05:00
--  
http://www.foxtable.com/help/topics/0224.htm
Select Case 只能判断固定某个值


--  作者:lsy
--  发布时间:2014/1/10 14:09:00
--  
Dim strs() As String = {"asd","df","dfg","fh"}
Dim s As String = "qr"
For Each str As String In strs
    If str = s Then
        Return Nothing
    End If
Next
Output.Show("不在")

--  作者:Bin
--  发布时间:2014/1/10 14:40:00
--  
Dim strs() As String = {"*asd*","*df*","*dfg*","*fh*"}
Dim s As String = "qr"
For Each str As String In strs
    If str like s Then
        Return Nothing
    End If
Next
Output.Show("不在")