course.htm

这是一组网页

    <td width=131><b>vbKeyF15</b></td> 
    <td width=123>0x7E</td> 
    <td width=220>F15 键</td> 
  </tr> 
  <tr valign="top">  
    <td width=131><b>vbKeyF16</b></td> 
    <td width=123>0x7F</td> 
    <td width=220>F16 键</td> 
  </tr> 
</table> 
<br>
<hr>
<p class="title_1"><a name="Miscellaneous 常数">Miscellaneous 常数</a></p>
		
<p>下列常数由 Visual Basic for Applications 中的类型库定义，可用来在代码中的任何地方代替实际值：</p>
<table border=1 cellpadding=5 cols=3 frame=below rules=rows>
  <tr valign="top"> 
    <td class="title_2" width=22%><b>常数</b></td>
    <td class="title_2" width=28%><b>等于</b></td>
    <td class="title_2" width=50%><b>描述</b></td>
  </tr>
  <tr valign="top"> 
    <td width=22%><b>vbCrLf</b></td>
    <td width=28%><b>Chr(</b>13<b>) + Chr(</b>10<b>)</b></td>
    <td width=50%>回车符与换行符结合</td>
  </tr>
  <tr valign="top"> 
    <td width=22%><b>vbCr</b></td>
    <td width=28%><b>Chr(</b>13<b>)</b></td>
    <td width=50%>回车符</td>
  </tr>
  <tr valign="top"> 
    <td width=22%><b>vbLf</b></td>
    <td width=28%><b>Chr(</b>10<b>)</b></td>
    <td width=50%>换行符</td>
  </tr>
  <tr valign="top"> 
    <td width=22%><b>vbNewLine</b></td>
    <td width=28%><b>Chr(</b>13<b>) + Chr(</b>10<b>) </b></td>
    <td width=50%>平台指定的新行字符；适用于当前平台</td>
  </tr>
  <tr valign="top"> 
    <td width=22%><b>vbNullChar</b></td>
    <td width=28%><b>Chr(</b>0<b>)</b></td>
    <td width=50%>值为 0 的字符</td>
  </tr>
  <tr valign="top"> 
    <td width=22%><b>vbNullString</b></td>
    <td width=28%>值为 0 的字符串</td>
    <td width=50%>用来调用外部过程；与长度为零的字符串 ("") 不同</td>
  </tr>
  <tr valign="top"> 
    <td width=22%><b>vbObjectError</b></td>
    <td width=28%>-2147221504</td>
    <td width=50%>用户定义的错误号应当大于该值，例如：<br>
      <code>Err.Raise Number = vbObjectError + 1000</code></td>
  </tr>
  <tr valign="top"> 
    <td width=22%><b>vbTab</b></td>
    <td width=28%><b>Chr(</b>9<b>)</b></td>
    <td width=50%>Tab 字。</td>
  </tr>
  <tr valign="top"> 
    <td width=22%><b>vbBack</b></td>
    <td width=28%><b>Chr(</b>8<b>)</b></td>
    <td width=50%>退格字符</td>
  </tr>
  <tr valign="top"> 
    <td width=22%><b>vbFormFeed</b></td>
    <td width=28%><b>Chr(</b>12<b>)</b></td>
    <td width=50%>在 Microsoft Windows 中没有作用</td>
  </tr>
  <tr valign="top"> 
    <td width=22%><b>vbVerticalTab</b></td>
    <td width=28%><b>Chr(</b>11<b>)</b></td>
    <td width=50%>在 Microsoft Windows 中没有作用</td>
  </tr>
</table>
<br>
<hr>
<p class="title_1"><a name="MsgBox 常数">MsgBox 常数</a></p>
		
<p>可在代码中的任何地方使用下列常数代替实际值：</p>
<p class="title_2">MsgBox 参数</p>
<table border=1 cellpadding=2 cols=4 frame=below rules=rows width="570">
  <tr valign="top"> 
    <td class="title_2" width=194><b>常数</b></td>
    <td class="title_2" width=60><b>值</b></td>
    <td class="title_2" colspan=2 width=288><b>描述</b></td>
  </tr>
  <tr valign="top"> 
    <td width=194><b>vbOKOnly</b></td>
    <td width=60>0</td>
    <td colspan=2 width=288>只有 <b>OK</b> 按钮（缺省值）</td> 
  </tr> 
  <tr valign="top">  
    <td width=194><b>vbOKCancel</b></td> 
    <td width=60>1</td> 
    <td colspan=2 width=288><b>OK</b> 和 <b>Cancel</b> 按钮</td> 
  </tr> 
  <tr valign="top">  
    <td width=194><b>vbAbortRetryIgnore</b></td> 
    <td width=60>2</td> 
    <td colspan=2 width=288><b>Abort</b>、<b>Retry</b>，和 <b>Ignore</b>  
      按钮</td> 
  </tr> 
  <tr valign="top">  
    <td width=194><b>vbYesNoCancel</b></td> 
    <td width=60>3</td> 
    <td colspan=2 width=288><b>Yes</b>、<b>No</b>，和 <b>Cancel</b>  
      按钮</td> 
  </tr> 
  <tr valign="top">  
    <td width=194><b>vbYesNo</b></td> 
    <td width=60>4</td> 
    <td colspan=2 width=288><b>Yes</b> 和 <b>No</b> 按钮</td> 
  </tr> 
  <tr valign="top">  
    <td width=194><b>vbRetryCancel</b></td> 
    <td width=60>5</td> 
    <td colspan=2 width=288><b>Retry</b> 和 <b>Cancel</b>  
      按钮</td> 
  </tr> 
  <tr valign="top">  
    <td width=194><b>vbCritical</b></td> 
    <td width=60>16</td> 
    <td colspan=2 width=288>关键消息</td> 
  </tr> 
  <tr valign="top">  
    <td width=194><b>vbQuestion</b></td> 
    <td width=60>32</td> 
    <td colspan=2 width=288>警告询问</td> 
  </tr> 
  <tr valign="top">  
    <td width=194><b>vbExclamation</b></td> 
    <td width=60>48</td> 
    <td colspan=2 width=288>警告消息</td> 
  </tr> 
  <tr valign="top">  
    <td width=194><b>vbInformation</b></td> 
    <td width=60>64</td> 
    <td colspan=2 width=288>通知消息</td> 
  </tr> 
  <tr valign="top">  
    <td width=194><b>vbDefaultButton1</b></td> 
    <td width=60>0</td> 
    <td colspan=2 width=288>第一个按钮是缺省的（缺省值）</td> 
  </tr> 
  <tr valign="top">  
    <td width=194><b>vbDefaultButton2</b></td> 
    <td width=60>256</td> 
    <td colspan=2 width=288>第二个按钮是缺省的</td> 
  </tr> 
  <tr valign="top">  
    <td width=194><b>vbDefaultButton3</b></td> 
    <td width=60>512</td> 
    <td colspan=2 width=288>第三个按钮是缺省的</td> 
  </tr> 
  <tr valign="top">  
    <td width=194><b>vbDefaultButton4</b></td> 
    <td width=60>768</td> 
    <td colspan=2 width=288>第四个按钮是缺省的</td> 
  </tr> 
  <tr valign="top">  
    <td width=194><b>vbApplicationModal</b></td> 
    <td width=60>0</td> 
    <td width=288>应用程序形态的消息框（缺省值）</td> 
  </tr> 
  <tr valign="top">  
    <td width=194><b>vbSystemModal</b></td> 
    <td width=60>4096</td> 
    <td colspan=2 width=288>系统强制返回的消息框</td> 
  </tr> 
  <tr valign="top">  
    <td width=194><b>vbMsgBoxHelpButton</b></td> 
    <td width=60>16384</td> 
    <td colspan=2 width=288>添加Help按钮到消息框</td> 
  </tr> 
  <tr valign="top">  
    <td width=194><b>VbMsgBoxSetForeground</b></td> 
    <td width=60>65536</td> 
    <td colspan=2 width=288>指定消息框窗口作为前景窗口</td> 
  </tr> 
  <tr valign="top">  
    <td width=194><b>vbMsgBoxRight</b></td> 
    <td width=60>524288</td> 
    <td colspan=2 width=288>文本是右对齐的</td> 
  </tr> 
  <tr valign="top">  
    <td width=194><b>vbMsgBoxRtlReading</b></td> 
    <td width=60>1048576</td> 
    <td colspan=2 width=288>指定在希伯来语和阿拉伯语系统中，文本应当显示为从右到左读</td> 
  </tr> 
</table> 
 
 

 
<br>
<p class="title_2">MsgBox 返回值</p>
<table border=1 cellpadding=5 cols=3 frame=below rules=rows width="520">
  <tr valign="top"> 
    <td width=108><b>常数</b></td>
    <td width=48><b>值</b></td>
    <td width=264><b>描述</b></td>
  </tr>
  <tr valign="top"> 
    <td width=108><b>vbOK</b></td>
    <td width=48>1</td>
    <td width=264>按下 <b>OK</b>  按钮</td> 
  </tr> 
  <tr valign="top">  
    <td width=108><b>vbCancel</b></td> 
    <td width=48>2</td> 
    <td width=264>按下 <b>Cancel</b>  按钮</td> 
  </tr> 
  <tr valign="top">  
    <td width=108><b>vbAbort</b></td> 
    <td width=48>3</td> 
    <td width=264>按下 <b>Abort</b>  按钮</td> 
  </tr> 
  <tr valign="top">  
    <td width=108><b>vbRetry</b></td> 
    <td width=48>4</td> 
    <td width=264>按下 <b>Retry</b>  按钮</td> 
  </tr> 
  <tr valign="top">  
    <td width=108><b>vbIgnore</b></td> 
    <td width=48>5</td> 
    <td width=264>按下 <b>Ignore</b>  按钮</td> 
  </tr> 
  <tr valign="top">  
    <td width=108><b>vbYes</b></td> 
    <td width=48>6</td> 
    <td width=264>按下 <b>Yes</b>  按钮</td> 
  </tr> 
  <tr valign="top">  
    <td width=108><b>vbNo</b></td> 
    <td width=48>7</td> 
    <td width=264>按下 <b>No</b>  按钮</td> 
  </tr> 
</table> 
<br>
<hr>
<p class="title_1"><a name="QueryClose常数">QueryClose常数</a></p>
		
<p>下列常数可以用于代码中的任何位置以代替实际值：</p>
<table border=1 cellpadding=5 cols=3 frame=below rules=rows width="520">
  <tr valign="top"> 
    <td class="title_2" width=155><b>常数</b></td>
    <td class="title_2" width=25><b>值</b></td>
    <td class="title_2" width=294><b>描述</b></td>
  </tr>
  <tr valign="top"> 
    <td width=155><b>vbFormControlMenu</b></td>
    <td width=25>0</td>
    <td width=294>用户从窗体上的<b>Control </b>菜单选择<b>Close</b> 命令。</td> 
  </tr> 
  <tr valign="top">  
    <td width=155><b>vbFormCode</b></td> 
    <td width=25>1</td> 
    <td width=294><b>Unload</b> 语句被从代码中调用。</td> 
  </tr> 
  <tr valign="top">  
    <td width=155><b>vbAppWindows</b></td> 
    <td width=25>2</td> 
    <td width=294>当前 Microsoft Windows 操作环境会话结束。</td> 
  </tr> 
  <tr valign="top">  
    <td width=155><b>vbAppTaskManager</b></td> 
    <td width=25>3</td> 
    <td width=294>Windows <b>Task Manager</b> 正在关闭应用程序。</td> 
  </tr> 
</table> 
<hr>
<p class="title_1"><a name="Dir、GetAttr 和 SetAttr 常数">Dir、GetAttr 和 SetAttr 常数</a>?</p>
<p>可在代码中的任何地方用下列常数代替实际值：</p>
<table border=1 cellpadding=2 cols=4 frame=below rules=rows width="520">
  <tr valign="top"> 
    <td class="title_2" width="126"><b>常数</b></td>
    <td class="title_2" width="62"><b>值</b></td>
    <td class="title_2" width="304"><b>描述</b></td>
  </tr>
  <tr valign="top"> 
    <td width="126"><b>vbNormal</b></td>
    <td width="62">0</td>
    <td width="304">正常的（<b>Dir </b>和 <b>SetAttr</b>   
      的缺省值）</td>  
  </tr>  
  <tr valign="top">   
    <td width="126"><b>vbReadOnly</b></td>  
    <td width="62">1</td>  
    <td width="304">只读的</td>  
  </tr>  
  <tr valign="top">   
    <td width="126"><b>vbHidden</b></td>  
    <td width="62">2</td>  
    <td width="304">隐藏的</td>  
  </tr>  
  <tr valign="top">   
    <td width="126"><b>vbSystem</b></td>  
    <td width="62">4</td>  
    <td width="304">系统文件</td>  
  </tr>  
  <tr valign="top">   
    <td width="126"><b>vbVolume</b></td>  
    <td width="62">8</td>  
    <td width="304">卷标</td>  
  </tr>  
  <tr valign="top">   
    <td width="126"><b>vbDirectory</b></td>  
    <td width="62">16</td>  
    <td width="304">目录或文件夹</td>  
  </tr>  
  <tr valign="top">   
    <td width="126"><b>vbArchive</b></td>  
    <td width="62">32</td>  
    <td width="304">文件自上一次备份后已经改变</td>  
  </tr>  
</table>  
<hr>
<p class="title_1"><a name="Shell 常数">Shell 常数</a></p>
<p>可在代码中的任何地方使用下列常数代替实际值：<br>
</p>
<table border=1 cellpadding=5 cols=3 frame=below rules=rows>
  <tr valign="top"> 
    <td width=31%><b>常数</b></td>
    <td width=12%><b>值</b></td>
    <td width=57%><b>描述</b></td>
  </tr>
  <tr valign="top"> 
    <td width=31%><b>vbHide</b></td>
    <td width=12%>0</td>
    <td width=57%>窗口是隐藏的，并且焦点被传递给隐藏窗口。</td>
  </tr>
  <tr valign="top"> 
    <td width=31%><b>vbNormalFocus</b></td>
    <td width=12%>1</td>
    <td width=57%>窗口拥有焦点，并且恢复到原来的大小与位置。</td>
  </tr>
  <tr valign="top"> 
    <td width=31%><b>vbMinimizedFocus</b></td>
    <td width=12%>2</td>
    <td width=57%>窗口缩小为图符并拥有焦点。</td>
  </tr>
  <tr valign="top"> 
    <td width=31%><b>vbMaximizedFocus</b></td>
    <td width=12%>3</td>
    <td width=57%>窗口最大化并拥有焦点。</td>
  </tr>
  <tr valign="top"> 
    <td width=31%><b>vbNormalNoFocus</b></td>
    <td width=12%>4</td>
    <td width=57%>窗口被恢复到最近一次的大小与位置。当前活动窗口仍为活动窗口。</td>
  </tr>
  <tr valign="top"> 
    <td width=31%><b>vbMinimizeNoFocus</b></td>
    <td width=12%>6</td>
    <td width=57%>窗口缩小为图符。当前活动窗口仍为活动窗口。</td>
  </tr>
</table>
<hr>
<p class="title_1"><a name="特殊文件夹常数">特殊文件夹常数</a></p>
<p>仅当您的工程对包含这些常数定义的相应类型库有一个显式引用时，才可以使用这些常数。</p>
<table border=1 cellpadding=5 cols=3 frame=below rules=rows>
  <tr valign="top"> 
    <td class="title_2" width=27%><b>常数</b></td>
    <td class="title_2" width=11%><b>值</b></td>
    <td class="title_2" width=62%><b>描述</b></td>
  </tr>
  <tr valign="top"> 
    <td width=27%><b>WindowsFolder</b></td>
    <td width=11%>0</td>
    <td width=62%>Windows文件夹包含由Windows操作系统安装的文件。</td>
  </tr>
  <tr valign="top"> 
    <td width=27%><b>SystemFolder</b></td>
    <td width=11%>1</td>
    <td width=62%>System（系统）文件夹包含库、字体和设备驱动程序。</td>
  </tr>
  <tr valign="top"> 
    <td width=27%><b>TemporaryFolder</b></td>