(声明:魏滔序原创,转贴请注明出处。)
Private Sub Command1_Click()
Dim str As String
Dim Cancel As Boolean
str = InputBox("")
Cancel = Not CBool(StrPtr(str))
MsgBox Cancel
End Sub
VB6中判断用户是否按下了InputBox的取消按钮
最新推荐文章于 2024-12-19 10:58:43 发布
本文提供了一个使用VBA(Visual Basic for Applications)创建简单输入对话框的例子。通过该示例,用户可以了解如何利用VBA在应用程序中实现基本的用户交互功能。代码展示了如何获取用户输入,并根据输入结果显示不同的消息。
2734

被折叠的 条评论
为什么被折叠?



