lzth.net
当前位置:首页 >> vB点击MsgBox窗口上的"是""否"按钮分别执行不同操作? >>

vB点击MsgBox窗口上的"是""否"按钮分别执行不同操作?

Private Sub Command1_Click() Dim i As Integer i = MsgBox("现在打开百度", vbYesNo, "提示") If i = vbYes Then Text1.Text = 100 If i = vbNo Then Text1.Text = 200 End Sub

Private Sub Form_Click() msg$ = "请确认此数据是否正确" Title$ = "数据检查对话框" x= MsgBox(msg$, 19, Title$) Ifx = 6 Then Printx * x ElseIfx = 7 Then Print "请重新输入" End IfEnd Sub

弹出一个对话框,里面的文字内容为变量a的值,标题则为变量b的值,其他则采用默认值(比如对话框中只有一个“确定”按钮)

If MsgBox("注册已完成,现在就登录吗?", vbOKCancel) = vbOK Then Form2.Show 假定Form2是登录窗口

msgbox函数有返回值的 MsgBox(prompt[, buttons] [, title] [, helpfile, context]) 返回值 用于MsgBox函数返回值的常量 常数值 说明 vbOK 1 确定 vbCancel 2 取消 vbAbort 3 终止 vbRetry 4 重试 vbIgnore 5 忽略 vbYes 6 是 vbNo 7 否 定义一...

msgbox不触发事件,而是返回一个VbMsgBoxResult类型的值: Dim r As VbMsgBoxResult r = MsgBox("请选择确定或取消", vbOKCancel) If r = vbOK Then MsgBox "你选了确定" Else MsgBox "你选了取消" End If

Private Sub Command1_Click() MsgBox "123" Command2_Click End Sub Private Sub Command2_Click() Me.Caption = "1111111" End Sub

VB6.0中MsgBox函数使用中buttons参数加个16是显示 Critical Message(关键信息) 图标。 MsgBox 函数,在对话框中显示消息,等待用户单击按钮,并返回一个 Integer 告诉用户单击哪一个按钮。 第一组值 (0–5) 描述了对话框中显示的按钮的类型与数...

VB中就2个按钮,它们分别是命令按钮(CommandButton)和单选按钮(OptionButton) 命令按钮(CommandButton):用于向VB应用程序发出指令,当单击此按钮时,可执行指定的操作。前缀是cmd,若命令按钮(CommandButton)的Enable属性设置为True时...

你说的是外部程序,还是自身程序? 如果是其他程序,需要通过另一程序来控制它的话,需要枚举窗体 如果是自身程序,则由本身代码控制。

网站首页 | 网站地图
All rights reserved Powered by www.lzth.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com