messageboxbuttons
发布时间：2025-08-18 | 来源：互联网转载和整理
1、PrivateSubForm_Load()
2、DimMsge
3、Msge=MsgBox('是否确定退出？'，vbOKCancel，'提示框)
4、IfMsge=vbOKThen
5、卸载我
6、结束条件
7、EndSub'【(vb6)】
8、` ` ` ` ` ` ` ` ` ` ` ` ` ` ` ` ` ` ` ` ` ` ` ` ` ` ` ` ` ` ` ` ` ` ` `……Dim messg As dialog result messg=Forms .MessageBox。显示('不是MessageBoxButtons '，'的成员消息窗，表格MessageBoxButtons。OKCancel)如果messg=表单.MessageBoxButtons好然后MsgBox('System .窗户。表格。messagebox按钮“)”-Dim messg As messagebox result messg=System .窗户。MessageBox.Show('不是MessageBoxButtons '，'的成员消息窗消息框按钮.OKCancel) If messg=Forms .MessageBoxButtons好然后MsgBox('System .Windows，MessageBoxButton[S]')