⭐ 欢迎来到虫虫下载站！ | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站
📤 上传资源

📄 vba函数说明.htm

📁 VBA帮助手册,VBA函数说明 ,VBA For Word 2000.CHM
💻 HTM
📖 第 1 页 / 共 5 页
字号:
🔍
12345 
<p class="T">如果 <i>date </i>中略去了年这一部分，<b>DateValue</b>    
就会使用由计算机系统日期设置的当前年份。</p>   
<p class="T">如果 <i>date </i>参数包含时间信息，则 <b>DateValue </b>不会返回它。但是，如果    
<i>date</i> 包含无效时间信息（如 89:98），则会导致错误发生。</p>   
<h1 align="center"><font color="#FFFFFF">Day 函数</font>&nbsp;&nbsp;&nbsp;</h1>   
<p class="T">返回一个 <b>Variant</b> (<b>Integer</b>)，其值为 1 到 31    
之间的整数，表示一个月中的某一日。</p>
<p><b>语法</b></p>
<p class="SYN"><b>Day(</b><i>date</i><b>)</b>
<p class="T">必要的 <i>date</i>  参数，可以是任何能够表示日期的  
Variant、数值表达式、字符串表达式或它们的组合。如果    
<i>date </i>包含 Null，则返回 <b>Null</b>。</p>   
<h1 align="center"><font color="#FFFFFF">DDB 函数</font></h1>   
<p class="T">返回一个 Double，指定一笔资产在一特定期间内的折旧。可使用双下落收复平衡方法或其它指定的方法进行计算。</p>  
<p><b>语法</b></p>
<p class="SYN"><b>DDB(<i>cost</i>,</b> <b><i>salvage</i></b>, <b><i>life</i></b>,    
<b><i>period</i></b>[, <b><i>factor</i></b>]<b>)</b>   
<p class="T"><b>DDB</b> 函数具有下列命名参数：</p>   
<table cellSpacing="4" cols="2" cellPadding="4">
  <tbody>
    <tr vAlign="top">
      <th width="15%">部分</th>
      <th width="85%">描述</th>
    </tr>
    <tr vAlign="top">
      <td class="T" width="15%"><b><i>cost</i></b></td>
      <td class="T" width="85%">必要。<b>Double </b>指定资产的初始成本。</td>
    </tr>
    <tr vAlign="top">
      <td class="T" width="15%"><b><i>salvage</i></b></td>
      <td class="T" width="85%">必要。<b>Double.</b>指定使用年限结束时的资产价值。</td>
    </tr>
    <tr vAlign="top">
      <td class="T" width="15%"><b><i>life</i></b></td>
      <td class="T" width="85%">必要。<b>Double </b>指定资产可用的可用年限。</td>
    </tr>
    <tr vAlign="top">
      <td class="T" width="15%"><b><i>period</i></b></td>
      <td class="T" width="85%">必要。<b>Double </b>指定计算资产折旧所用的那一期间。</td>
    </tr>
    <tr vAlign="top">
      <td class="T" width="15%"><b><i>factor</i></b></td>
      <td class="T" width="85%">可选。Variant   
        指定收复平衡下落时的速度。如果省略的话，2（双下落方法）为缺省值。</td> 
    </tr>
  </tbody>
</table>
<p><b>说明</b></p>
<p class="T">双下落收复平衡方法用加速利率法计算折旧。在第一段时期，折旧为最高，而在接下来的期间内降低。</p>
<p class="T"><b><i>life</i></b> 和 <b><i>period</i></b>  参数必须用相同的单位表示。例如，如果    
<b><i>life</i></b> 用月份表示，则 <b><i>period</i></b>    
也必须用月份表示。所有参数都必须是正值。</p>   
<p class="T"><b>DDB</b> 
函数使用下列公式计算在一定时期后的折旧：</p>   
<p class="T">折旧 / <b><i>period</i></b> = ((<b><i>cost </i></b>– <b><i>alvage</i></b>)    
* <b><i>factor</i></b>) / <b><i>life</i></b></p>   
<h1 align="center"><font color="#FFFFFF">Dir 函数</font></h1>   
<p class="T">返回一个 <b>String</b>，用以表示一个文件名、目录名或文件夹名称，它必须与指定的模式或文件属性、或磁盘卷标相匹配。</p>   
<p><b>语法</b></p>
<p class="SYN"><b>Dir</b>[<b>(</b><i>pathname</i>[<b>,</b><i> attributes</i>]<b>)</b>]</p>
<p class="T"><b>Dir</b> 函数的语法具有以下几个部分：</p>   
<table cellSpacing="4" cols="4" cellPadding="4">
  <tbody>
    <tr vAlign="top">
      <th width="16%" colSpan="2">部分</th>
      <th width="84%" colSpan="2">描述</th>
    </tr>
    <tr vAlign="top">
      <td class="T" width="12%"><i>pathname</i></td>
      <td class="T" width="84%" colSpan="2">可选参数。用来指定文件名的字符串表达式，可能包含目录或文件夹、以及驱动器。如果没有找到    
        <i>pathname</i>，则会返回零长度字符串 (&quot;&quot;)。</td>   
    </tr>
    <tr vAlign="top">
      <td class="T" width="12%"><i>attributes</i></td>
      <td class="T" width="84%" colSpan="2">可选参数。常数或数值表达式，其总和用来指定文件属性。如果省略，则会返回匹配    
        <i>pathname</i> 但不包含属性的文件。</td>   
    </tr>
  </tbody>
</table>
<p><b>设置值</b></p>
<p class="T"><i>attributes</i>  参数的设置可为：</p>  
<table cellSpacing="4" cols="3" cellPadding="4">
  <tbody>
    <tr vAlign="top">
      <th width="24%">常数</th>
      <th width="13%">值</th>
      <th width="63%">描述</th>
    </tr>
    <tr vAlign="top">
      <td class="T" width="24%"><b>vbNormal</b></td>
      <td class="T" width="13%">0</td>
      <td class="T" width="63%">(缺省) 指定没有属性的文件。</td>   
    </tr>
    <tr vAlign="top">
      <td class="T" width="24%"><b>vbReadOnly</b></td>
      <td class="T" width="13%">1</td>
      <td class="T" width="63%">指定无属性的只读文件</td>
    </tr>
    <tr vAlign="top">
      <td class="T" width="24%"><b>vbHidden</b></td>
      <td class="T" width="13%">2</td>
      <td class="T" width="63%">指定无属性的隐藏文件</td>
    </tr>
    <tr vAlign="top">
      <td class="T" width="24%"><b>VbSystem</b></td>
      <td class="T" width="13%">4</td>
      <td class="T" width="63%">指定无属性的系统文件 在Macintosh中不可用。</td>   
    </tr>
    <tr vAlign="top">
      <td class="T" width="24%"><b>vbVolume</b></td>
      <td class="T" width="13%">8</td>
      <td class="T" width="63%">指定卷标文件；如果指定了其它属性，则忽略<b>vbVolume</b> 
        在Macintosh中不可用。</td>   
    </tr>
    <tr vAlign="top">
      <td class="T" width="24%"><b>vbDirectory</b></td>
      <td class="T" width="13%">16</td>
      <td class="T" width="63%">指定无属性文件及其路径和文件夹。</td>
    </tr>
    <tr vAlign="top">
      <td class="T" width="24%"><b>vbAlias</b></td>
      <td class="T" width="13%">64</td>
      <td class="T" width="63%">指定的文件名是别名，只在Macintosh上可用。</td>
    </tr>
  </tbody>
</table>
<br>
<b>注意</b> 这些常数是由 VBA    
所指定的，在程序代码中的任何位置，可以使用这些常数来替换真正的数值。
<p><b>说明</b></p>
<p class="T">在 Microsoft Windows 中， <b>Dir</b> 支持多字符 (<b>*) </b>和单字符    
(<b>?) </b>的通配符来指定多重文件。</p>
<p class="T">在 Macintosh    
中，这些字符作为合法文件名字符并且不能作为通配符来指定多个文件</p>
<p class="T">由于 Macintosh    
不支持通配符，使用文件类型指定文件组。可以使用 <b>MacID</b>    
函数指定文件类型而不用文件名。比如，下列语句返回当前文件夹中第一个TEXT文件的名称:</p>   
<pre class="CT"><code>Dir(&quot;SomePath&quot;, MacID(&quot;TEXT&quot;))
</code></pre>
<p class="T">为选中文件夹中所有文件，指定一空串:</p>
<pre class="CT"><code>Dir(&quot;&quot;)
</code></pre>
<p class="T">在 Microsoft Windows 中，如果在<b>Dir</b>函数中使用<b>MacID</b>函数，将产生错误。</p>   
<p class="T">任何大于256的<i>attribute</i>值都被认为是<b>MacID</b> 
函数的值。</p>   
<p class="T">在第一次调用 <b>Dir</b> 函数时，必须指定 <i>pathname</i>，否则会产生错误。如果也指定了文件属性，那么就必须包括    
<i>pathname</i>。</p>
<p class="T"><b>Dir</b> 会返回匹配 <i>pathname</i>    
的第一个文件名。若想得到其它匹配 <i>pathname</i>    
的文件名，再一次调用 <b>Dir</b>，且不要使用参数。如果已没有合乎条件的文件，则    
<b>Dir</b> 会返回一个零长度字符串 (&quot;&quot;)。一旦返回值为零长度字符串，并要再次调用    
<b>Dir </b>时，就必须指定 <i>pathname</i>，否则会产生错误。不必访问到所有匹配当前    
<i>pathname</i> 的文件名，就可以改变到一个新的 <i>pathname </i>上。但是，不能以递归方式来调用    
<b>Dir</b> 函数。以 <b>vbDirectory</b> 属性来调用<b> Dir</b>    
不能连续地返回子目录。</p>   
<p class="NT"><b>提示</b> 
由于文件名并不会以特别的次序来返回，所以可以将文件名存储在一个数组中，然后再对这个数组排序。</p>  
<h1 align="center"><font color="#FFFFFF">DoEvents 函数</font></h1>   
<p class="T">转让控制权，以便让操作系统处理其它的事件。</p>
<p><b>语法</b></p>
<p class="SYN"><b>DoEvents( )</b>   
<p><b>说明</b></p>
<p class="T"><b>DoEvents</b> 函数会返回一个 Integer，以代表    
Visual Basic 独立版本中打开的窗体数目，例如，Visual Basic，专业版，在其它的应用程序中，<b>DoEvents    
</b>返回 0。</p>   
<p class="T"><b>DoEvents </b>会将控制权传给操作系统。当操作系统处理完队列中的事件，并且在    
<b>SendKeys </b>队列中的所有键也都已送出之后，返回控制权。</p>
<p class="T"><b>DoEvents</b> 
对于简化诸如允许用户取消一个已启动的过程 —    
例如搜寻一个文件 —    
特别有用。对于长时间过程，放弃控制权最好使用定时器或通过委派任务给    
ActiveX EXE    
部件来完成。以后，任务还是完全独立于应用程序，多任务及时间片由操作系统来处理。</p>
<p class="NT"><b>小心</b> 确保以 <b>DoEvents</b> 放弃控制权的过程，在第一次    
<b>DoEvents </b>返回之前，不能再次被其他部分的代码调用；否则会产生不可预料的结果。此外，如果其它的应用程序可能会和本过程以不可预知的方式进行交互操作，那么也不要使用    
<b>DoEvents</b>，因为此时不能放弃控制权。</p>
<h1 align="center"><font color="#FFFFFF">Environ 函数</font></h1>   
<p class="T">返回 <b>String</b>，它关连于一个操作系统环境变量。    
在 Macintosh 中不可用</p>   
<p><b>语法</b></p>
<p class="SYN"><b>Environ(</b>{<b><i>envstring</i></b> | <b><i>number</i></b>}<b>)</b>   
<p class="T"><b>Environ </b>函数的语法含有以下这些命名参数：</p>
<table cellSpacing="4" cols="2" cellPadding="4">
  <tbody>
    <tr vAlign="top">
      <th width="16%">部分</th>
      <th width="84%">描述</th>
    </tr>
    <tr vAlign="top">
      <td class="T" width="16%"><b><i>envstring</i></b></td>
      <td class="T" width="84%">可选参数。包含一个环境变量名的字符串表达式。</td>
    </tr>
    <tr vAlign="top">
      <td class="T" width="16%"><b><i>number</i></b></td>
      <td class="T" width="84%">可选参数。数值表达式，用来表示环境字符串在环境字符串表格中的数值顺序。<b><i>number</i></b> 
        参数可以是任意的数值表达式，不过在计算前，它会先转换为一个整数。</td>  
    </tr>
  </tbody>
</table>
<p><b>说明</b></p>
<p class="T">如果在环境字符串表格中找不到 <b><i>envstring</i></b>，则会返回一个零长度字符串    
(&quot;&quot;)。如果找到，则 <b>Environ</b>    
会返回一段文本，文本是赋值给指定的 <b><i>envstring </i></b>的，也就是说，在环境字符串表格中对应那个环境变量的等号    
(=) 后面的那段文本。</p>   
<p class="T">如果指定了 <b><i>number</i></b>，则在环境字符串表格中相应位置上的字符串会返回。在这种情况下，<b>Environ</b>    
会返回整个文本，包括 <b><i>envstring</i></b>。如果在指定位置上没有环境字符串，那么<b>    
Environ</b> 会返回一个零长度字符串。</p>   
<p class="NT">　</p>
<h1 align="center"><font color="#FFFFFF">EOF 函数</font></h1>   
<p class="T">返回一个 Integer，它包含 Boolean 值 <b>True</b>，表明已经到达为    
<b>Random </b>或顺序 <b>Input</b> 打开的文件的结尾。</p>   
<p><b>语法</b></p>
<p class="SYN"><b>EOF(</b><i>filenumber</i><b>)</b>
<p class="T">必要的 <i>filenumber </i>参数是一个    
<b>Integer，</b>包含任何有效的文件号。</p>
<p><b>说明</b></p>
<p class="T">使用 <b>EOF </b>是为了避免因试图在文件结尾处进行输入而产生的错误。</p>   
<p class="T">直到到达文件的结尾，<b>EOF</b> 函数都返回 <b>False</b>。对于为访问    
<b>Random</b> 或 <b>Binary </b>而打开的文件，直到最后一次执行的    
<b>Get </b>语句无法读出完整的记录时，<b>EOF </b>都返回 <b>False</b>。</p>   
<p class="T">对于为访问 <b>Binary </b>而打开的文件，在 <b>EOF </b>函数返回    
<b>True </b>之前，试图使用 <b>Input</b>    
函数读出整个文件的任何尝试都会导致错误发生。在用 <b>Input</b>    
函数读出二进制文件时，要用 <b>LOF </b>和 <b>Loc</b>    
函数来替换 <b>EOF </b>函数，或者将 <b>Get</b> 函数与 <b>EOF</b>    
函数配合使用。对于为 <b>Output </b>打开的文件，<b>EOF</b>    
总是返回 <b>True</b>。</p>   
<h1 align="center"><font color="#FFFFFF">Error 函数</font></h1>   
<p class="T">返回对应于已知错误号的错误信息。</p>
<p><b>语法</b></p>
<p class="SYN"><b>Error</b>[<b>(</b><i>errornumber</i><b>)</b>]</p>
<p class="T">这个可选的 <i>errornumber</i>  参数可以为任何有效的错误号。如果    
<i>errornumber</i> 是有效的错误号，但尚未被定义，则 <b>Error</b>    
将返回字符串“应用程序定义的错误或对象定义的错误”。如果    
<i>errornumber </i>不是有效的错误号，则会导致错误发生。如果省略    
<i>errornumber</i>，就会返回与最近一次运行时错误对应的消息。如果没有发生运行时错误，或者    
<i>errornumber</i> 是 0，则 <b>Error</b> 返回一个长度为零的字符串    
(&quot;&quot;)。</p>
<p><b>说明</b></p>
<p class="T">请检查 <b>Err</b> 对象的属性设置，以便认定最近一次运行时错误。<b>Error</b>    
函数的返回值对应于 <b>Err </b>对象的 <b>Description </b>属性。</p>   
<h
12345

⌨️ 快捷键说明

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