小隐的博客

人生在世，笑饮一生

:: :: :: ::

VB6中判断用户是否按下了InputBox的取消按钮

Posted on 2007-12-15 22:54 隐客阅读(910) 评论(0) 收藏举报

    Dim s As String
    Dim Cancel As Boolean
    s = InputBox("")
    Cancel = Not CBool(StrPtr(s))
    MsgBox Cancel

刷新页面返回顶部