Dim Result As DialogResult
Result = MessageBox.Show("Visual Basic一点不难,是不是?", "提示", MessageBoxButtons.YesNoCancel, MessageBoxIcon.Question)
If Result = DialogResult.Yes Then 如果选择了“是”
MessageBox.Show("不错,说明你已经认真学习了.","提示")
Else 否则没有选择“是”，有可能选择了否或者取消。
MessageBox.Show("好好学习吧,你会认同这个看法的.","提示")
End If
这里的取消只是一个按钮的名称以及按钮对应点击的结果，而不是代表一个动作，得到取消的结果后应该怎么做要自己处理的，比如
If Result = DialogResult.Yes Then 表示点击了是
MessageBox.Show("不错,说明你已经认真学习了.","提示")
elseif Result = DialogResult.Cancel Then 表示点击了取消
取消的处理，比如返回
return
Else 剩下的就是表示点击了否
MessageBox.Show("好好学习吧,你会认同这个看法的.","提示")
End If
加好友 
发短信
Post By：2021/1/28 22:51:00 [只看该作者]
