实现的调用代码是:
frmBalloonMsg.BalloonMsgBoxToControl Command1, "气泡提示的内容。"
frmBalloonMsg.BalloonMsgBoxToControl Command2, _
"若勾选下面的复选框,下次再单击窗体上的按钮时将不会再显示气泡提示。", _
"这是气泡提示的标题", IDI_EXCLAMATION, iChkValue, -1, False
仅此而已。
frmBalloonMsg还是通用模块里介绍的,新书“老兵新传:Visual Basic核心编程及通用模块开发”(清华社)介绍的,再次声明:跟卖书无关,只是有感而发(这是本人见过的实现该功能的最简单的方法)!!!