以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  关于表达式求助  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=169372)

--  作者:YUNSEL
--  发布时间:2021/6/14 9:21:00
--  关于表达式求助
我想实现:当s不在h里面,提示1,在的话提示2;

Dim s As Integer = 1
Dim h As String = "1,12,3"
If s not ni h Then  
    MessageBox.Show(1)
Else
    MessageBox.Show(2)
End If

这段代码执行提示 If s not ni h Then  应为结束语句;
说明:s是个ID字段,不能用 If h.Contains(s) Then

求老师帮忙,谢谢!
[此贴子已经被作者于2021/6/14 9:21:50编辑过]

--  作者:有点蓝
--  发布时间:2021/6/14 21:09:00
--  
Dim s As Integer = 1
Dim h As String = "1,12,3"
Dim lst As new List(of String)
lst.AddRange(h.Split(","))
If lst.Contains(s) Then  
    MessageBox.Show(1)
Else
    MessageBox.Show(2)
End If