:VFP的messagebox问题
来源:百度文库 编辑:九乡新闻网 时间:2024/05/13 16:30:16
以下是vfp6中的messagebox( ) 函数的完整用法,请参考:
messagebox( ) 函数
显示一个用户自定义对话框。
语法
MESSAGEBOX(cMessageText [, nDialogBoxType [, cTitleBarText]])
参数
cMessageText
指定在对话框中显示的文本。在 cMessageText 中包含回车符 (CHR(13)) 可以使信息移到下一行显示。对话框的高度和宽度根据 cMessageText 适当增大,以包含全部信息。
nDialogBoxType
指定对话框中的按钮和图标、显示对话框时的默认按钮以及对话框的行为。
在下面的表中,对话框按钮值从 0 到 5 指定了对话框中显示的按钮。图标值 16、32、64 指定了对话框中的图标。默认值 0、256、512 指定对话框中哪个按钮为默认按钮。当显示对话框时选中此默认按钮。
当省略 nDialagBoxType 时,等同于指定 nDialagBoxType 值为0。
数值 对话框按钮
0 仅有“确定”按钮
1 “确定”和“取消”按钮
2 “放弃”、“重试”和“忽略”按钮
3 “是”、“否”和“取消”按钮
4 “是”、“否”按钮
5 “重试”和“取消”按钮
数值 图标
16 “停止”图标
32 问号
48 惊叹号
64 信息 (i) 图标
数值 默认按钮
0 第一个按钮
256 第二个按钮
512 第三个按钮
nDialogBoxType 可以是三个值的和从上面每个表中选一个值。例如,若 nDialogBoxType 为 290(2+32+256),则指定的对话框含有如下特征:
“放弃”、“重试”或“忽略”按钮。
消息框显示问号图标。
第二个按钮,“重试”为默认按钮。
cTitleBarText
指定对话框标题栏中的文本。若省略 cTitleBarText,标题栏中将显示“Microsoft Visual FoxPro”
返回值类型
数值型
说明
MESSAGEBOX( ) 的返回值标明选取了对话框中的哪个按钮。在含有取消按钮的对话框中,如果按下 ESC 键退出对话框,则与选取“取消”按钮一样,返回值 (2)。
注意本函数的最短缩写为 MESSAGEB( )。
下表列出了 MESSAGEBOX( ) 对应每个按钮的返回值。
返回值 按钮
1 确定
2 取消
3 放弃
4 重试
5 忽略
6 是
7 否
下面的示例中显示了一个用户自定义对话框。标题“record not found.would you like to search again?”显示在用户自定义对话框中,标题栏中显示“my application”。用户自定义对话框含有“是”和“否”按钮以及问号图标。第二个按钮 (no) 为默认按钮。当选取一个按钮时,显示所选的内容。
cmessagetitle = 'my application'
cmessagetext = 'record not found. would you like to search again?'
ndialogtype = 4 + 32 + 256
* 4 = yes and no buttons
* 32 = question mark icon
* 256 = second button is default
nanswer = messagebox(cmessagetext, ndialogtype, cmessagetitle)
do case
case nanswer = 6
wait window 'you chose yes'
case nanswer = 7
wait window 'you chose no'
endcase
本人在《建筑租赁结算管理中的软件》注册中的声明中使用的messagebox()例子如下:
messagebox(" 根据《中华人民共和国著作法》及《中华人"+chr(13)+chr(13)+;
"民共和国计算机软件保护法》,本软件享有个人"+chr(13)+chr(13)+;
"知识产权。任何单位及个人未经本人书面授权销"+chr(13)+chr(13)+;
"售及非法解密复制销售,均为侵权行为。产权人"+chr(13)+chr(13)+;
"具有依法保护本软件产品的权力和义务。"+chr(13)+chr(13)+chr(13)+;
"如果想购买此产品,请与此产品的开发者联系。"+chr(13)+chr(13)+;
" 您的申请码为:"+str(xx)+chr(13)+chr(13)+;
" 我的办公电话: (0411)83636***"+chr(13)+chr(13)+;
" 我的移动电话: 13500737***"+chr(13)+chr(13)+;
" 联系人 : ******",64,"请尊重他人的劳动!")
messagebox( ) 函数
显示一个用户自定义对话框。
语法
MESSAGEBOX(cMessageText [, nDialogBoxType [, cTitleBarText]])
参数
cMessageText
指定在对话框中显示的文本。在 cMessageText 中包含回车符 (CHR(13)) 可以使信息移到下一行显示。对话框的高度和宽度根据 cMessageText 适当增大,以包含全部信息。
nDialogBoxType
指定对话框中的按钮和图标、显示对话框时的默认按钮以及对话框的行为。
在下面的表中,对话框按钮值从 0 到 5 指定了对话框中显示的按钮。图标值 16、32、64 指定了对话框中的图标。默认值 0、256、512 指定对话框中哪个按钮为默认按钮。当显示对话框时选中此默认按钮。
当省略 nDialagBoxType 时,等同于指定 nDialagBoxType 值为0。
数值 对话框按钮
0 仅有“确定”按钮
1 “确定”和“取消”按钮
2 “放弃”、“重试”和“忽略”按钮
3 “是”、“否”和“取消”按钮
4 “是”、“否”按钮
5 “重试”和“取消”按钮
数值 图标
16 “停止”图标
32 问号
48 惊叹号
64 信息 (i) 图标
数值 默认按钮
0 第一个按钮
256 第二个按钮
512 第三个按钮
nDialogBoxType 可以是三个值的和从上面每个表中选一个值。例如,若 nDialogBoxType 为 290(2+32+256),则指定的对话框含有如下特征:
“放弃”、“重试”或“忽略”按钮。
消息框显示问号图标。
第二个按钮,“重试”为默认按钮。
cTitleBarText
指定对话框标题栏中的文本。若省略 cTitleBarText,标题栏中将显示“Microsoft Visual FoxPro”
返回值类型
数值型
说明
MESSAGEBOX( ) 的返回值标明选取了对话框中的哪个按钮。在含有取消按钮的对话框中,如果按下 ESC 键退出对话框,则与选取“取消”按钮一样,返回值 (2)。
注意本函数的最短缩写为 MESSAGEB( )。
下表列出了 MESSAGEBOX( ) 对应每个按钮的返回值。
返回值 按钮
1 确定
2 取消
3 放弃
4 重试
5 忽略
6 是
7 否
下面的示例中显示了一个用户自定义对话框。标题“record not found.would you like to search again?”显示在用户自定义对话框中,标题栏中显示“my application”。用户自定义对话框含有“是”和“否”按钮以及问号图标。第二个按钮 (no) 为默认按钮。当选取一个按钮时,显示所选的内容。
cmessagetitle = 'my application'
cmessagetext = 'record not found. would you like to search again?'
ndialogtype = 4 + 32 + 256
* 4 = yes and no buttons
* 32 = question mark icon
* 256 = second button is default
nanswer = messagebox(cmessagetext, ndialogtype, cmessagetitle)
do case
case nanswer = 6
wait window 'you chose yes'
case nanswer = 7
wait window 'you chose no'
endcase
本人在《建筑租赁结算管理中的软件》注册中的声明中使用的messagebox()例子如下:
messagebox(" 根据《中华人民共和国著作法》及《中华人"+chr(13)+chr(13)+;
"民共和国计算机软件保护法》,本软件享有个人"+chr(13)+chr(13)+;
"知识产权。任何单位及个人未经本人书面授权销"+chr(13)+chr(13)+;
"售及非法解密复制销售,均为侵权行为。产权人"+chr(13)+chr(13)+;
"具有依法保护本软件产品的权力和义务。"+chr(13)+chr(13)+chr(13)+;
"如果想购买此产品,请与此产品的开发者联系。"+chr(13)+chr(13)+;
" 您的申请码为:"+str(xx)+chr(13)+chr(13)+;
" 我的办公电话: (0411)83636***"+chr(13)+chr(13)+;
" 我的移动电话: 13500737***"+chr(13)+chr(13)+;
" 联系人 : ******",64,"请尊重他人的劳动!")
VFP的messagebox问题
VFP访问ACCESS的问题.
VFP经典问题集
解决VFP中表格控件Grid的数据源刷新问题
VFP的学习心得感受
vfp命令的含义
解决VFP中表格控件Grid的数据源刷新问题1
VFP:更复杂的查询
VFP程序的五点经验
编程入门网-VFP经典问题集(全)
vfp编程入门网-表的操作
VFP 表与表的关系
vfp含GRID通用表单的设置1
求助:VFP中如何接收传感器的数据?
VFP中多条件数据查询程序的实现
VFP数据库(表)的概念及操作(佳)
计算机vfp
VFP &&& EXCEL
VFP主程序
VFP 索引
编程入门网-让VFP的程序在Windows启动后自动运行
第一部 vfp基础教程 基础知识 命令大全 - chinazblz的日志 - 网易博客
在VFP中如何从数据表中获取一个字段的最大值
计算机等级考试:二级VFP机试