VBA，Excel中用代码写弹出式窗体（不要用用户窗体）。

Question

VBA，Excel中用代码写弹出式窗体（不要用用户窗体）。实现以下功能：
程序执行后
1弹出弹出式窗体，窗体主要有一个可编辑文本框和确定及取消控件。
2弹出式窗体关闭（确定后关闭或者取消后关闭）
3获取弹出式窗体关闭前信息，通过取消键关闭直接结束程序，否则过去文本框内容值
重点：是这个弹出式窗体要求用VBA语言直接构造，非窗体插件（如果是说用用户窗体手动绘制的就算了）

Answer 1

这不就是InputBox函数的用法么，如果连续输入放在循环里就好，点击取消，会返0长度字符，如：

Public Sub 输入()
    Dim Trng
    Trng = InputBox("请输入，输入要求是：XXXXXXXXXXX")
    If Len(Trng) = 0 Then Exit Sub
    MsgBox Trng
End Sub

追问

不问不知道，一问吓一跳。还有这函数，好神奇明天看看