VB语句判断数字价格在多少之内则执行动作的语句改怎么写?

Private Sub Form_Click() x = Val(InputBox(“请输入价格：”)) If x < 440000 Then MsgBox “价格在440000之内” Else MsgBox “价格超出” End IfEnd Sub