请教：强制转换成布尔型cbool（）！！！！！！！！！！！在线等待！！！！！！！！！！！

Question

cbool()不接受无法转换成数字的变量
你这里如果c="1"是可以，因为 "1"会被自动转换为1，其他的字符串不行

Answer 1

CBool 函数示例
本示例使用 CBool 函数来将一表达式转成 Boolean 值。如果表达式的结果为非零的值，CBool 返回 True；否则返回 False。Dim A, B, Check
A = 5: B = 5   ' 设置变量初值。
Check = CBool(A = B)   ' Check 的值为 True。A = 0   ' 定义变量。
Check = CBool(A)   ' Check 的值为 False。你把表达式与字符串搞混淆了
你不用e变量就ok
 Dim A 'As Integer
     Dim B 'As Integer
     Dim c 'As String
     Dim e 'As String
     Dim d 'As Boolean     A = 2
     B = 1
'     c = "  > = "
'     e = A & c & B
'     MsgBox e
     d = CBool(A >= B)
     If d Then
     MsgBox d
     End If

Answer 2

to  csdnHelp(你好吗？) 
 
我的c也是变量，要动态得到的“》=”只是我举个例而已？

Answer 3

可以用用微软脚本控件求你要的值
引用microsoft script control
d= Str(scrCalc.Eval(e)) 
scrcalc 是微软脚本控件

Answer 4

to  qdcb(天冬草):
    你说的方法我不会，请问还有没有别的方法？谢谢！

Answer 5

to  qdcb(天冬草) :
     你的意思是通过d= Str(scrCalc.Eval(e)) 就把d转换成布尔型的变量了吗？如果方便的话

Answer 6

做成个查询字符串，送去给SQL判断。
怎么样，这个办法够离谱吧！不过确实可行的。