求助IF多条件包含怎么简写

leolee82

路一直都在下雨 发表于 2023-6-7 11:07
你要的是这个？

这样用是错的，虽然语法上没报错。
"0123" like "*1*" like "*2*"=Ture Like "*2*"=False

VBA里比较高效的方法应该是用select模拟短路求值：

1. Sub ds()
   
2. Dim u As String
   
3. u = "023"
   
4. Select Case False
   
5. Case u Like a, u Like b
   
6.     MsgBox "false"
   
7. Case Else
   
8.     MsgBox "TRUE"
   
9. End Select
   
10. End Sub
    
11. Function a()
    
12. a = "*1*"
    
13. End Function
    
14. Function b()'不会执行这个函数
    
15. b = "*2*"
    
16. End Function
    

复制代码