请VB高手指点一下 在线等待

Question

这个问题很基础。但我刚学不久。所以请留言的朋友。尽可能的写的详细一点。最好写一个代码段问。当点击一个按钮的时候。弹出来一个对话框。上面有确定和取消两个按钮
我想让点确定的时候保存数据。点取消的时候回到程序界面上什么也不做。就像。一盘的确定和取消功能一样。但是好像不加代码只有确定可以用。取消用不了。请高手指点一二我真诚的想认识几位有共同爱好的朋友。如果愿意可以加我OICQ：149151083信箱：[email protected]

Answer 1

加上这么一段
if msgbox("你的提示语句",vbYesNo,"标题")=vbYes then
    '可以在这里加上你的处理语句，也可以不加
else
    '可以在这里退出当前过程
    exit sub
end if即可

Answer 2

Private Sub Command1_Click()
    Dim ret As Long
    ret = MsgBox("aaa", vbOKCancel, "shiya")
    If ret = vbOK Then
        Text1 = "vbOK"
    End If
End Sub

Answer 3

Yn = MsgBox("提示", vbYesNo)
If Yn = vbYes Then
   '你想做的事
Else
   '退出
   Exit Sub
End If

Answer 4

up
用直接的按钮值也可，如：vbyesno   yes = 6  no = 7
if i = 6 then
   .....
elseif i = 7 then 
   .....
else
   ....
end if

Answer 5

dim lngRet as long
lngRet = Msgbox("Do Something?",vbokcancel+vbquestion,"OK?")
If lngRet = vbOK Then
    '案下了确定的处理代码
Else
    '案下了取消得处理代码
End If

Answer 6

我试了。如果在
then 后面不加代码　在 else 后面也不另代码。会出现死徇环便是加代码。才能让点取消的时候。回到程序界面中。

Answer 7

就是要加代码呀
在YES的情况下做你需要的处理
在NO的情况下放弃

Answer 8

我又试了一次。是不是一定要把MSGBOX复给一个变量啊。我怎么给你们分啊