📄 access实例-16.htm
字号:
<body bgcolor="#000000">
<P align=center><FONT color="#FFFFFF"
size=4><B><font color="#009900">消息框中默认的按钮 </font></B></FONT><font color="#FFFFFF"> </font></P>
<SPAN
class=large><FONT color=#000000>
<P><font color="#FFFFFF">MsgBox 函数语法如下: MsgBox(prompt[, buttons] [, title] [,
helpfile, context])</font></P>
<DIV align=center>
<CENTER>
<TABLE>
<CAPTION>
<FONT color=#FFFFFF>buttons 参数有关按钮缺省值的设置值</FONT>
</CAPTION>
<TBODY>
<TR>
<TD width=128 bgColor=#c0c0c0 height=20> <P align=center><FONT color=#FFFFFF>VBA常量名称
</FONT></P></TD>
<TD width=28 bgColor=#c0c0c0 height=20> <P align=center><FONT color=#FFFFFF>值
</FONT></P></TD>
<TD width=145 bgColor=#c0c0c0 height=20> <P align=center><FONT color=#FFFFFF>说明
</FONT></P></TD>
</TR>
<TR>
<TD width=128 height=20><FONT
color=#FFFFFF>VbDefaultButton1</FONT></TD>
<TD align=middle width=28 height=20><FONT
color=#FFFFFF>0</FONT></TD>
<TD width=145 height=20><FONT
color=#FFFFFF>第一个按钮是缺省值。</FONT></TD>
</TR>
<TR>
<TD width=128 height=20><FONT
color=#FFFFFF>VbDefaultButton2</FONT></TD>
<TD align=middle width=28 height=20><FONT
color=#FFFFFF>256</FONT></TD>
<TD width=145 height=20><FONT
color=#FFFFFF>第二个按钮是缺省值。</FONT></TD>
</TR>
<TR>
<TD noWrap width=128 height=20><FONT
color=#FFFFFF>VbDefaultButton3</FONT></TD>
<TD align=middle width=28 height=20><FONT
color=#FFFFFF>512</FONT></TD>
<TD noWrap width=145 height=20><FONT
color=#FFFFFF>第三个按钮是缺省值。</FONT></TD>
</TR>
<TR>
<TD width=128 height=20><FONT
color=#FFFFFF>VbDefaultButton4</FONT></TD>
<TD align=middle width=28 height=20><FONT
color=#FFFFFF>768</FONT></TD>
<TD width=145 height=20><FONT
color=#FFFFFF>第四个按钮是缺省值。</FONT></TD>
</TR>
</TBODY>
</TABLE>
<P
align=left><font color="#FFFFFF">当设置了按钮的缺省值后,在消息框弹出时如果按下回车键,相当于单击缺省按钮。下面三幅图是当按钮缺省值为不同值时的运行效果:</font></P>
<P align=center><font color="#FFFFFF"><IMG height=115 alt=第一个按钮是缺省值例子
src="ACCESS实例-16.files/20.gif" width=312><BR>
第一个按钮是缺省值</font></P>
<P align=left><font color="#FFFFFF">VBA语句:MsgBox "第一个按钮是缺省值的例子", 3 + 64 +
0, "消息框演示"<BR>
' 3表示显示 是、否 和 取消按钮,64是为了显示一个图标,仅是为了美观,0表示第一个按钮是缺省值</font> </P>
<P align=center><font color="#FFFFFF"><IMG height=115 alt=第二个按钮是缺省值例子
src="ACCESS实例-16.files/21.gif" width=312><BR>
第二个按钮是缺省值</font></P>
<P align=left><font color="#FFFFFF">VBA语句:MsgBox "第二个按钮是缺省值的例子", 3 + 64 +
256, "消息框演示" </font></P>
<P align=center><font color="#FFFFFF"><IMG height=115 alt=第三个按钮是缺省值例子
src="ACCESS实例-16.files/22.gif" width=312><BR>
第三个按钮是缺省值</font></P>
<P align=left><font color="#FFFFFF">VBA语句:MsgBox "第三个按钮是缺省值的例子", 3 + 64 +
512, "消息框演示" </font></P>
</CENTER>
</DIV>
</FONT></SPAN>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -