| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 997 人关注过本帖
标题:[求助]对话框的值怎么接收
只看楼主 加入收藏
woalafang
Rank: 1
等 级:新手上路
帖 子:39
专家分:0
注 册:2006-7-17
收藏
 问题点数:0 回复次数:2 
[求助]对话框的值怎么接收

VBscript 里面msgbox函数可以弹出对话框,当那个对话框我选择只显示确定和取消两种按纽时,下面该怎么写代码来接收两个按纽的返回值啊?会的请教教,同时把代码写出来吧

搜索更多相关主题的帖子: 对话框 VBscript msgbox 返回值 
2007-03-05 16:19
google
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:22
帖 子:3419
专家分:23
注 册:2005-11-1
收藏
得分:0 

把代码发上来看看哦


祝天下所有母亲幸福安康!~
2007-03-05 18:20
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
收藏
得分:0 

MsgBox函数语言参考

描述
  在对话框中显示消息,等待用户单击按钮,并返回一个值指示用户单击的按钮。
  语法
  MsgBox(prompt[, buttons][, title][, helpfile, context])
  MsgBox 函数的语法有以下参数:

参数 描述
  prompt 作为消息显示在对话框中的字符串表达式。prompt 的最大长度大约是 1024 个字符,这取决于所使用的字符的宽度。如果 prompt 中包含多个行,则可在各行之间用回车符 (Chr(13))、换行符 (Chr(10)) 或回车换行符的组合 (Chr(13) & Chr(10)) 分隔各行。
  buttons 数值表达式,是表示指定显示按钮的数目和类型、使用的图标样式,默认按钮的标识以及消息框样式的数值的总和。有关数值,请参阅“设置”部分。如果省略,则 buttons 的默认值为 0。
  title 显示在对话框标题栏中的字符串表达式。如果省略 title,则将应用程序的名称显示在标题栏中。
  helpfile 字符串表达式,用于标识为对话框提供上下文相关帮助的帮助文件。如果已提供 helpfile,则必须提供 context。在 16 位系统平台上不可用。
  context 数值表达式,用于标识由帮助文件的作者指定给某个帮助主题的上下文编号。如果已提供 context,则必须提供 helpfile。在 16 位系统平台上不可用。

设置
  buttons 参数可以有以下值:
  常数 值 描述
  vbOKOnly 0 只显示确定按钮。
  vbOKCancel 1 显示确定和取消按钮。
  vbAbortRetryIgnore 2 显示放弃、重试和忽略按钮。
  vbYesNoCancel 3 显示是、否和取消按钮。
  vbYesNo 4 显示是和否按钮。
  vbRetryCancel 5 显示重试和取消按钮。
  vbCritical 16 显示临界信息图标。
  vbQuestion 32 显示警告查询图标。
  vbExclamation 48 显示警告消息图标。
  vbInformation 64 显示信息消息图标。
  vbDefaultButton1 0 第一个按钮为默认按钮。
  vbDefaultButton2 256 第二个按钮为默认按钮。
  vbDefaultButton3 512 第三个按钮为默认按钮。
  vbDefaultButton4 768 第四个按钮为默认按钮。
  vbApplicationModal 0 应用程序模式:用户必须响应消息框才能继续在当前应用程序中工作。
  vbsystemModal 4096 系统模式:在用户响应消息框前,所有应用程序都被挂起。

第一组值 (0 - 5) 用于描述对话框中显示的按钮类型与数目;第二组值 (16, 32, 48, 64) 用于描述图标的样式;第三组值 (0, 256, 512) 用于确定默认按钮;而第四组值 (0, 4096) 则决定消息框的样式。在将这些数字相加以生成 buttons 参数值时,只能从每组值中取用一个数字。

返回值
  MsgBox 函数有以下返回值:
  常数 值 按钮
  vbOK 1 确定
  vbCancel 2 取消
  vbAbort 3 放弃
  vbRetry 4 重试
  vbIgnore 5 忽略
  vbYes 6 是
  vbNo 7 否

说明
  如果同时提供了 helpfile 和 context,则用户可以按 F1 键以查看与上下文相对应的帮助主题。
  如果对话框显示取消按钮,则按 ESC 键与单击取消的效果相同。如果对话框包含帮助按钮,则有为对话框提供的上下文相关帮助。但是在单击其他按钮之前,不会返回任何值。

下面的示例利用MsgBox 函数显示一信息框并且返回值说明了按下的是那一个按钮:

Dim MyVar
  MyVar = MsgBox ("Hello World!", 65, "MsgBox 例子") ' MyVar 包含 either 1 or 2, '依赖于被按下的按钮。


确定取消按钮可以这样写
Dim IsOKVal
IsOKVal=MsgBox("对话框消息信息",1,"对话框标题")
IF IsOKVal=1 Then
MsgBox "点了确定按钮"
Else
MsgBox "点了取消按钮"
End IF

2007-03-06 09:15
快速回复:[求助]对话框的值怎么接收
数据加载中...
 
   



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

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