急!!!!!!!懂VB编程的高手请帮忙,很简单的问题!

来源:百度知道 编辑:UC知道 时间:2024/05/23 15:32:58
我在用VB编程的过程中加入消息框,
MsgBox " 确定要更改该员工家庭成员记录吗?", 3 + 32 + 0, " 确定更改"
可是点击"是","否",和"取消"的效果一样,请问需要怎么编写代码才行呢?请写一下代码,谢谢!

msgbox函数是有返回值的
比如
dim choice
choice=msgbox(" 确定要更改该员工家庭成员记录吗?", 3 + 32 + 0, " 确定更改" )
用户按不一样的按钮
choice的值是不一样的
你可以通过判断choice的值来判断用户按了哪个按钮

Dim V As String
V = MsgBox(" 确定要更改该员工家庭成员记录吗?", 3 + 32 + 0, " 确定更改")
Select Case V
Case 6
Print "您按的是 -- 是"
Case 7
Print "您按的是 -- 否"
Case 2
Print "您按的是 --取消"
End Select

MSGBOX 返回值列表
常数 值 按钮
vbOK 1 确定
vbCancel 2 取消
vbAbort 3 放弃
vbRetry 4 重试
vbIgnore 5 忽略
vbYes 6 是
vbNo 7 否

MSGBOX Buttons 参数值
常数 值 描述
vbOKOnly 0 只显示确定按钮。
vbOKCancel 1 显示确定和取消按钮。
vbAbortRetryIgnore 2 显示放弃、重试和忽略按钮。
vbYesNoCancel 3 显示是、否和取消按钮。
vbYesNo 4 显示是和否按钮。
vbRetryCancel 5 显示重试和取消按钮。
vbCritical 16 显示临界信息图标。
vbQuestion 32 显示警告查询图标。
vbExclamation 48 显示警告消息图标。
vbInformation 64 显示信息消息图标。
vbDefau