access实例-15.htm

来自「微软数据库开发梦工场多媒体教学-ACCESS篇.rar」· HTM 代码 · 共 100 行

HTM
100
字号
<body bgcolor="#000000">
<P align=center><FONT color="#009900" 
            size=4><B>消息框的按钮类型 </B></FONT></P>
<SPAN 
            class=large><FONT color=#000000>
<P><font color="#FFFFFF">MsgBox 函数语法如下:<BR>
  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=204 bgColor=#c0c0c0 height=20> <P align=center><FONT color=#FFFFFF>说明 
              </FONT></P></TD>
        </TR>
        <TR> 
          <TD width=128 height=20><FONT 
                  color=#FFFFFF>vbOKOnly&nbsp;</FONT></TD>
          <TD align=middle width=28 height=20><FONT 
                  color=#FFFFFF>0</FONT></TD>
          <TD width=204 height=20><FONT color=#FFFFFF>只显示 确定 按钮。</FONT></TD>
        </TR>
        <TR> 
          <TD width=128 height=20><FONT 
                color=#FFFFFF>VbOKCancel</FONT></TD>
          <TD align=middle width=28 height=20><FONT 
                  color=#FFFFFF>1</FONT></TD>
          <TD width=204 height=20><FONT color=#FFFFFF>显示 确定 及 取消 按钮。</FONT></TD>
        </TR>
        <TR> 
          <TD noWrap width=128 height=20><FONT 
                  color=#FFFFFF>VbAbortRetryIgnore</FONT></TD>
          <TD align=middle width=28 height=20><FONT 
                  color=#FFFFFF>2</FONT></TD>
          <TD noWrap width=204 height=20><FONT color=#FFFFFF>显示 放弃、重试 及 忽略 按钮。</FONT></TD>
        </TR>
        <TR> 
          <TD width=128 height=20><FONT 
                  color=#FFFFFF>VbYesNoCancel</FONT></TD>
          <TD align=middle width=28 height=20><FONT 
                  color=#FFFFFF>3</FONT></TD>
          <TD width=204 height=20><FONT color=#FFFFFF>显示 是、否 及 取消 按钮。</FONT></TD>
        </TR>
        <TR> 
          <TD width=128 height=20><FONT color=#FFFFFF>VbYesNo</FONT></TD>
          <TD align=middle width=28 height=20><FONT 
                  color=#FFFFFF>4</FONT></TD>
          <TD width=204 height=20><FONT color=#FFFFFF>显示 是 及 否 按钮。</FONT></TD>
        </TR>
        <TR> 
          <TD width=128 height=20><FONT 
                  color=#FFFFFF>VbRetryCancel</FONT></TD>
          <TD align=middle width=28 height=20><FONT 
                  color=#FFFFFF>5</FONT></TD>
          <TD width=204 height=20><FONT color=#FFFFFF>显示 重试 及 取消 按钮。</FONT></TD>
        </TR>
      </TBODY>
    </TABLE>
    <P align=left><font color="#FFFFFF">当buttons取不同值时的运行效果如下面的几幅图所示:</font></P>
    <P align=center><font color="#FFFFFF"><IMG height=115 alt="只显示 确定 按钮" 
            src="ACCESS实例-15.files/14.gif" width=252><BR>
      只显示 确定 按钮</font></P>
    <P align=left><font color="#FFFFFF">VBA语句:MsgBox "这是只有确定按钮的例子", 0 + 64, "消息框演示"<BR>
      '&nbsp; 0表示只显示确定按钮,64是为了显示一个图标,仅是为了美观</font></P>
    <P align=center><font color="#FFFFFF"><IMG height=115 alt="显示 确定 和 取消 按钮" 
            src="ACCESS实例-15.files/15.gif" width=252><BR>
      显示 确定 和 取消 按钮<BR>
      </font></P>
    <P align=left><font color="#FFFFFF">VBA语句: MsgBox "这是有确定和取消按钮的例子", 1 + 64, 
      "消息框演示" </font></P>
    <P align=center><font color="#FFFFFF"><IMG height=115 alt="显示 放弃、重试 和 忽略 按钮" 
            src="ACCESS实例-15.files/16.gif" width=312><BR>
      显示 放弃、重试 和 忽略 按钮</font></P>
    <P align=left><font color="#FFFFFF">VBA语句: MsgBox "这是有放弃、重试和忽略按钮的例子", 2 + 
      64, "消息框演示" </font></P>
    <P align=center><font color="#FFFFFF"><IMG height=115 alt="显示 是、否 和 取消 按钮" 
            src="ACCESS实例-15.files/17.gif" width=312><BR>
      显示 是、否 和 取消 按钮</font></P>
    <P align=left><font color="#FFFFFF">VBA语句: MsgBox "这是有是、否和取消按钮的例子", 3 + 64, 
      "消息框演示" </font></P>
    <P align=center><font color="#FFFFFF"><IMG height=115 alt="显示 是 和 否 按钮" 
            src="ACCESS实例-15.files/18.gif" width=252><BR>
      显示 是 和 否 按钮</font></P>
    <P align=left><font color="#FFFFFF">VBA语句: MsgBox "这是有是和否按钮的例子", 4 + 64, "消息框演示" 
      </font></P>
    <P align=center><font color="#FFFFFF"><IMG height=115 alt="显示 重试 和 取消 按钮" 
            src="ACCESS实例-15.files/19.gif" width=252><BR>
      显示 重试 和 取消 按钮</font></P>
    <P align=left><font color="#FFFFFF">VBA语句:MsgBox "这是有重试和取消按钮的例子", 5 + 64, 
      "消息框演示" </font></P>
  </CENTER>
</DIV>
</FONT></SPAN>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?