给一个vb6.0中的msgbox用vbyesno时的具体用法嘛
1个回答
展开全部
你打开vb6,然后只在新窗体上画一个command1按钮,复制以下代码运行看看效果吧。
Private Sub Command1_Click()
If MsgBox("你真的要将窗体的背景颜色修改成蓝色吗?", vbYesNo, "请你确认") = vbYes Then
Form1.BackColor = &HFF0000
End If
End Sub
Private Sub Form_Load()
Command1.Caption = "将窗体背景修改成蓝色"
End Sub
这个实例代码的作用是:单击按钮、就出现msgbox的对话框,要你选择“是”或“否”,是就将窗体背景的颜色改成了蓝色。
Private Sub Command1_Click()
If MsgBox("你真的要将窗体的背景颜色修改成蓝色吗?", vbYesNo, "请你确认") = vbYes Then
Form1.BackColor = &HFF0000
End If
End Sub
Private Sub Form_Load()
Command1.Caption = "将窗体背景修改成蓝色"
End Sub
这个实例代码的作用是:单击按钮、就出现msgbox的对话框,要你选择“是”或“否”,是就将窗体背景的颜色改成了蓝色。
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询