关于inputbox!!!!

Question

inputbox对话框的“确定”和“取消”按扭功能似乎是一样的。请看例子：Private Sub Command1_Click()
Dim a As String
a = InputBox("输入", "提示")
Text1.Text = a
End Sub我想让它按“取消”时不输入text1，怎么办？

Answer 1

Private Sub Command1_Click()
Dim a As String
a = InputBox("输入", "提示")
If a <> "" Then
    Text1.Text = a
End If
End Sub

Answer 2

不可能吧，我在vb6sp5下测试，很正常啊。输入些东西然后按取消的话a的值是空。文本框什么也没有。

Answer 3

因为程序在一直向下执行了
Text1.Text = a
这个操作 如：If a = 0 Then MsgBox "a=0"
MsgBox "不等于0"
要避开   MsgBox "不等于0"  的执行