怎么样按了一个按钮后自动弹出对话框啊
解决方案 »
- ado连结access得奇怪错误
- 关于突然断电造成数据库损坏的问题
- 如何从有多个小图标组成的图片中提取小图标
- 要在类里封装ado.connection 对象,需要实现connection对象的属性方法事件,有没有什么工具能自动完成代码?
- 请问commondialog控件如何一次选取多个文件?
- 我用ADODC连接数据库,adodc.recordset最多可以有多少记录!??
- 象windows自带的软键盘功能怎样实现?
- 一个极其菜的问题,在线等待解决
- MousePointer有没有手形状的,类似于超链接的效果!
- 大毛病-------急急急!!(好像和内存有关)
- 如何利用sleep()函数实现程序短暂停顿?
- 如何读取或者创建文本文件
Dim Msg, Style, Title, Help, Ctxt, Response, MyString
Msg = "结束程序 ?" ' 定义信息。
Style = vbYesNo + vbCritical + vbDefaultButton2 ' 定义按钮。
Title = "结束程序" ' 定义标题。
Help = "DEMO.HLP" ' 定义帮助文件。
Ctxt = 1000 ' 定义标题
' 显示信息。
Response = MsgBox(Msg, Style, Title, Help, Ctxt)
If Response = vbYes Then ' 用户按下“是”。
MyString = "Yes" ' 完成某操作。
End
Else ' 用户按下“否”。
MyString = "No" ' 完成某操作。
End If
End Sub