求助，如何在vba中a同时满足两个条件？

france723

findvba 发表于 2017-5-17 16:50
b是function name， x是变量
所以结论不应该是 b= true or b=false？

你应该这么写, 比如function name是testte.

1. Function testte(x)
   
2. Dim b As Boolean
   
3. If x >= 1 And x <= 5 And x <> 4 Then
   
4.     b = True
   
5. Else
   
6.     b = False
   
7. End If
   
8. End Function

复制代码

另外, 你把b 定义开关变量,=false,=ture. 测试函数是不会显示出来的, 因为他是开关变量, 用来后面程序的判断

france723

findvba 发表于 2017-5-17 16:50
b是function name， x是变量
所以结论不应该是 b= true or b=false？

我估计你是想实现这样一个函数, 如果符合条件函数的返回值"Ture", 如果不符合条件函数的返回值"False". 那你不需要使用开关变量.

1. Function testte(x)
   
2. If x >= 1 And x <= 5 And x <> 4 Then
   
3.     testte = "Ture"
   
4. Else
   
5.     testte = "False"
   
6. End If
   
7. End Function

复制代码