以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]Select Case语句  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=176036)

--  作者:2425004926
--  发布时间:2022/3/28 15:01:00
--  [求助]Select Case语句
Select Case这个语句怎么能逻列出包含项,而不仅仅是等于或区间

Dim txt As String = "传真  fasdfkj"
Select Case txt.Contains()
    Case "f"
        Output.Show("1")
    Case "00"
        Output.Show("2")
End Select
--  作者:有点蓝
--  发布时间:2022/3/28 15:09:00
--  
Dim txt As String = "传真  fasdfkj"
Select Case true
    Case txt.Contains("f")
        Output.Show("1")
    Case txt.Contains("00")
        Output.Show("2")
End Select


--  作者:2425004926
--  发布时间:2022/3/28 15:15:00
--  
 
Dim txt As String = "传真  fasdfkj"
Select Case true
    Case txt.Contains("f"),txt.Contains("a"),txt.Contains("k")
        Output.Show("1")
    Case txt.Contains("00")
        Output.Show("2")
End Select

--  作者:2425004926
--  发布时间:2022/3/28 15:16:00
--  
 高!真高!!谢谢老师!