从组合框调用变量访问 VBA 时出现问题

Question

我对 VBA 非常陌生，并且正在制作一个模拟程序来计算某人是否有资格获得住房贷款，但是我遇到了包含数值的组合框将它们的值传递给代码中使用的变量的问题，任何帮助将不胜感激。这是我的代码：

Private Sub Elegibility_Calculator_Click()

    'Variables
    Dim crScore As Integer
    Dim yrIncome As Long
    Dim MINCRSCORE As Integer
    Dim MINYRINCOME As Long

    'Variable Values
    crScore = cbocrScore
    yrIncome = cboyrIncome
    MINCRSCORE = 650
    MINYRINCOME = 100000

    'Calculate Elegibility
    If crScore >= MINCRSCORE & yrIncome >= MINYRINCOME Then
    MsgBox "blah"
Else
    MsgBox "bad blah"
End If

End Sub

Answer 1

您的 If 条件使用 & 用于连接。请改用逻辑运算符AND。