Question

请教VB高手：如何判断用户在inputbox函数框中是按了确定还是取消？

各位大师别见笑，本人是VB的超级菜鸟，请教如下：
我设计了一个小程序，想让用户在inputbox中输入数据。如果用户点确定按键，就先判断inputbox里是否为空，是否为合法数字，如果是就提示用户重新输入；但是，如果用户单击“取消”，则exit sub. 请举简单的例子加以说明。

Answer 1

Private Sub Command1_Click()
Dim T1
100
T1 = InputBox("请输入：", "", "==")
If T1 = "==" Then
MsgBox "还没输入！"
GoTo 100
ElseIf T1 = "" Then
Exit Sub
ElseIf Not IsNumeric(T1) Then
MsgBox "请输入数字！"
GoTo 100
End If
End Sub

Answer 2

YesOrNo = inputbox("需要新日期的 每日生产记录 工作表吗？", vbYesNo + vbQuestion + vbDefaultButton1)
If YesOrNo = vbYes Then