Ms access 如果语句在VBA中不起作用

我正在自学VBA，并试图编写一个小程序来完成以下工作

1.要求用户在文本框中输入10到20之间的数字
2.单击按钮时，代码将检查文本框中输入的数字。如果数字介于10和20之间，则会显示一条消息。如果输入的数字不在10到20之间，则会邀请用户尝试增益，文本框中输入的内容将被删除

Private Sub Command0_Click()
Me.Text3.SetFocus
inumber = Val(Text3.Text)
If inumber >= 10 & inumber <= 20 Then
MsgBox ("The number you entered is: ") & inumber
Else
Text3.Text = ""
MsgBox ("Please try again")
End If

End Sub

Private子命令0\u Click（）
Me.Text3.SetFocus
inumber=Val（Text3.Text）
如果inumber>=10&inumber
如果Form\u customer\u test>=10&inumber=10&inumber
如果Form\u customer\u test>=10&inumber=10&inumber请尝试下面的方法<代码>&
用于VB中的字符串连接<代码>和
应在VB中使用

Private Sub Command0_Click()
    Me.Text3.SetFocus
    inumber = Val(Text3.Text)
    If inumber >= 10 And inumber <= 20 Then
        MsgBox ("The number you entered is: ") & inumber
    Else
        Text3.Text = ""
        MsgBox ("Please try again")
    End If
End Sub

Private子命令0\u Click（）
Me.Text3.SetFocus
inumber=Val（Text3.Text）
如果inumber>=10且inumber请尝试以下操作<代码>&
用于VB中的字符串连接<代码>和

应在VB中使用

Private Sub Command0_Click()
    Me.Text3.SetFocus
    inumber = Val(Text3.Text)
    If inumber >= 10 And inumber <= 20 Then
        MsgBox ("The number you entered is: ") & inumber
    Else
        Text3.Text = ""
        MsgBox ("Please try again")
    End If
End Sub

Private子命令0\u Click（）
Me.Text3.SetFocus
inumber=Val（Text3.Text）
如果inumber>=10且inumber确认：对逻辑运算符使用“And”和“or”或“or”
确认：对逻辑运算符使用“And”和“or”或“or”
如果您在某处定义
表单客户测试
，然后如果
If
应该是
If Form\u customer\u test>=10，inumber=10，inumber如果您在某处定义
Form\u customer\u test
，那么
If
应该是
If Form\u customer\u test>=10，inumber=10，inumber感谢您指出这一点。很抱歉，这是一个输入错误，我实际上是把它作为一个数字，而不是表格客户测试。我不知道这是怎么回事。谢谢你指出这一点。很抱歉，这是一个输入错误，我实际上是把它作为一个数字，而不是表格客户测试。我不知道这是怎么回事。非常感谢！就这样！谢谢，现在可以用了。：）非常感谢你！就这样！谢谢，现在可以用了。：）
Private Sub Command0_Click()
    Me.Text3.SetFocus
    inumber = Val(Text3.Text)
    If inumber >= 10 And inumber <= 20 Then
        MsgBox ("The number you entered is: ") & inumber
    Else
        Text3.Text = ""
        MsgBox ("Please try again")
    End If
End Sub