以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  字符判定  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=130084)

--  作者:benwong2015
--  发布时间:2019/1/12 17:21:00
--  字符判定
如果 a = 10,11,12,13,14,15
假设 b = 11;

如果判定b在a中有存在时,显示提示为true,否则为false;

--  作者:有点蓝
--  发布时间:2019/1/12 17:34:00
--  
a是字符串?逗号后面有空格?

请列举严谨的数据

--  作者:benwong2015
--  发布时间:2019/1/12 17:37:00
--  
 a为字符串,逗号没有空格 dim a as string = "10,11,12,13,14,15"
--  作者:有点蓝
--  发布时间:2019/1/12 17:46:00
--  
if ("," & a & ",").contains("," & b & ",") then msgbox("包含")

Dim lst As new List(of String)
lst.AddRange(a.split(",")) 
If lst.Contains(b) Then msgbox("包含")