Vba 来自单元格内容的if块中的逻辑运算符

我有一个单元格“可以在代码中用于处理由构造字符串描述的操作

Sub eval_test()
    Dim e As Long

    e = 9
    Range("D8") = "<"
    Debug.Print e & Range("D8").Value & 10

    If Application.Evaluate(e & Range("D8").Value & 10) Then
        MsgBox "e is " & Range("D8").Value & " 10"
    Else
        MsgBox "e is not " & Range("D8").Value & " 10"
    End If

End Sub

Sub-eval_测试（）
暗淡如长
e=9
范围（“D8”）=”
if(e>10) then
    msgbox "greater than 10"
Endif

Sub eval_test()
    Dim e As Long

    e = 9
    Range("D8") = "<"
    Debug.Print e & Range("D8").Value & 10

    If Application.Evaluate(e & Range("D8").Value & 10) Then
        MsgBox "e is " & Range("D8").Value & " 10"
    Else
        MsgBox "e is not " & Range("D8").Value & " 10"
    End If

End Sub