标题:[求助]怎样捕捉Msg$ =""的确定和取消的值
只看楼主
zhangsj
Rank: 1
等 级:新手上路
帖 子:47
专家分:0
注 册:2006-11-15
 问题点数:0 回复次数:4 
[求助]怎样捕捉Msg$ =""的确定和取消的值
请教:怎样捕捉Msg$ =""的确定和取消的值,也就是说,在程序中怎样知道是按了确定按键还是按了取消键?谢谢
搜索更多相关主题的帖子: Msg 
2006-11-29 13:39
purana
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:广东-广州
等 级:版主
威 望:66
帖 子:6039
专家分:0
注 册:2005-6-17
得分:0 
首先,我不清楚Msg$ =""是什么东东..

...如果你是指MsgBox函数的话...那么它返回vbOK的话..就是确定键...如果是返回vbCancel的话..那就是取消键..

我的msn: myfend@
2006-11-29 13:41
noctune
Rank: 1
等 级:新手上路
帖 子:47
专家分:0
注 册:2006-6-8
得分:0 

写段代码给你

[CODE]
Option Explicit
Const sTitle As String = "系统提示"

Private Sub Form_Load()
Dim Rtn As Integer

Rtn = MsgBox("请您选择", vbYesNoCancel + vbInformation, sTitle)

Select Case Rtn
Case vbYes:
MsgBox "你按了 是 ", vbInformation + vbOKOnly, sTitle
Case vbNo:
MsgBox "你按了 否", vbInformation + vbOKOnly, sTitle
Case vbCancel:
MsgBox "你按了 取消 ", vbInformation + vbOKOnly, sTitle
End Select

Unload Me
End Sub
[/CODE]

其实MSGBOX返回的值就是几个整数值,你可以看看参考文档。



世界上有两种人:懂二进制的和不懂二进制的。
2006-12-01 13:26
beyondlwm
Rank: 1
等 级:新手上路
帖 子:98
专家分:0
注 册:2006-7-19
得分:0 
楼上的签名真好玩
2006-12-01 15:29
noctune
Rank: 1
等 级:新手上路
帖 子:47
专家分:0
注 册:2006-6-8
得分:0 

beyondlwm
你的头像也不差啊,比我签名好玩多了~~
我这算是灌水吗?
要是的话,那希望斑竹别把我给。。。





世界上有两种人:懂二进制的和不懂二进制的。
2006-12-01 16:40



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-106093-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.020097 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved