visualfoxpro的MESSAGEBOX()的格式是什么
2个回答
展开全部
显示一个用户自定义对话框。
MESSAGEBOX(eMessageText [, nDialogBoxType ][, cTitleBarText][, nTimeout])
返回值
数值型
参数
eMessageText
指定在对话框中显示的文本。在 cMessageText 中包含回车符 (CHR(13)) 可以使信息移到下一行显示。对话框的高度和宽度根据 cMessageText 适当增大,以包含全部信息。
可以使用任何可用的 Visual FoxPro 函数或数据类型代替 eMessageText。如果你使用的函数的计算结果是非字符型的值, Visual FoxPro 自动用 TRANSFORM 来提供字符转换, 如下面示例一样:
MESSAGEBOX(DATE())
nDialogBoxType
指定对话框中的按钮和图标、显示对话框时的默认按钮以及对话框的行为。
在下面的表中,对话框按钮值从 0 到 5 指定了对话框中显示的按钮。图标值 16、32、64 指定了对话框中的图标。默认值 0、256、512 指定对话框中哪个按钮为默认按钮。当显示对话框时选中此默认按钮。
示例
下面的示例中显示了一个用户自定义对话框。标题“record not found.would you like to search again?”显示在用户自定义对话框中,标题栏中显示“my application”。
用户自定义对话框含有“是”和“否”按钮以及问号图标。第二个按钮 (no) 为默认按钮。当选取一个按钮时,显示所选的内容。
cMessageTitle = '我的应用程序'
cMessageText = '记录未找到。要再次搜索吗?'
nDialogType = 4 + 32 + 256
* 4 = Yes 和 No 按钮
* 32 = 问号图标
* 256 = 默认为第二个按钮
nAnswer = MESSAGEBOX(cMessageText, nDialogType, cMessageTitle)
DO CASE
CASE nAnswer = 6
WAIT WINDOW '你选择了 Yes'
CASE nAnswer = 7
WAIT WINDOW '你选择了 No'
ENDCASE
MESSAGEBOX(eMessageText [, nDialogBoxType ][, cTitleBarText][, nTimeout])
返回值
数值型
参数
eMessageText
指定在对话框中显示的文本。在 cMessageText 中包含回车符 (CHR(13)) 可以使信息移到下一行显示。对话框的高度和宽度根据 cMessageText 适当增大,以包含全部信息。
可以使用任何可用的 Visual FoxPro 函数或数据类型代替 eMessageText。如果你使用的函数的计算结果是非字符型的值, Visual FoxPro 自动用 TRANSFORM 来提供字符转换, 如下面示例一样:
MESSAGEBOX(DATE())
nDialogBoxType
指定对话框中的按钮和图标、显示对话框时的默认按钮以及对话框的行为。
在下面的表中,对话框按钮值从 0 到 5 指定了对话框中显示的按钮。图标值 16、32、64 指定了对话框中的图标。默认值 0、256、512 指定对话框中哪个按钮为默认按钮。当显示对话框时选中此默认按钮。
示例
下面的示例中显示了一个用户自定义对话框。标题“record not found.would you like to search again?”显示在用户自定义对话框中,标题栏中显示“my application”。
用户自定义对话框含有“是”和“否”按钮以及问号图标。第二个按钮 (no) 为默认按钮。当选取一个按钮时,显示所选的内容。
cMessageTitle = '我的应用程序'
cMessageText = '记录未找到。要再次搜索吗?'
nDialogType = 4 + 32 + 256
* 4 = Yes 和 No 按钮
* 32 = 问号图标
* 256 = 默认为第二个按钮
nAnswer = MESSAGEBOX(cMessageText, nDialogType, cMessageTitle)
DO CASE
CASE nAnswer = 6
WAIT WINDOW '你选择了 Yes'
CASE nAnswer = 7
WAIT WINDOW '你选择了 No'
ENDCASE
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询