3.htm

vb基础教程源文件 处学者必备

  <td width=55 style='width:41.25pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
  <p><strong><span lang=EN-US>T </span></strong></p>
  <p><strong><span lang=EN-US>F </span></strong></p>
  <p><strong><span lang=EN-US>T </span></strong></p>
  <p><strong><span lang=EN-US>T </span></strong></p>
  </td>
 </tr>
 <tr>
  <td width=67 style='width:50.25pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
  <p align=center style='text-align:center'><strong><span lang=EN-US>Xor </span></strong></p>
  </td>
  <td width=48 style='width:36.0pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
  <p><strong>异或 </strong></p>
  </td>
  <td width=60 style='width:45.0pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
  <p align=center style='text-align:center'><strong><span lang=EN-US>3 </span></strong></p>
  </td>
  <td width=312 style='width:234.0pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
  <p>两个操作数不相同，结果才为真，否则为假 </p>
  </td>
  <td width=96 style='width:72.0pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
  <p><strong><span lang=EN-US>T Xor F </span></strong></p>
  <p><strong><span lang=EN-US>T Xor T </span></strong></p>
  </td>
  <td width=55 style='width:41.25pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
  <p><strong><span lang=EN-US>T </span></strong></p>
  <p><strong><span lang=EN-US>F </span></strong></p>
  </td>
 </tr>
 <tr>
  <td width=67 style='width:50.25pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
  <p align=center style='text-align:center'><strong><span lang=EN-US>Eqv </span></strong></p>
  </td>
  <td width=48 style='width:36.0pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
  <p><strong>等价 </strong></p>
  </td>
  <td width=60 style='width:45.0pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
  <p align=center style='text-align:center'><strong><span lang=EN-US>4 </span></strong></p>
  </td>
  <td width=312 style='width:234.0pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
  <p>两个操作数相同时，结果才为真 </p>
  </td>
  <td width=96 style='width:72.0pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
  <p><strong><span lang=EN-US>T Eqv F </span></strong></p>
  <p><strong><span lang=EN-US>T Eqv T </span></strong></p>
  </td>
  <td width=55 style='width:41.25pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
  <p><strong><span lang=EN-US>F </span></strong></p>
  <p><strong><span lang=EN-US>T </span></strong></p>
  </td>
 </tr>
 <tr>
  <td width=67 style='width:50.25pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
  <p align=center style='text-align:center'><strong><span lang=EN-US>Imp </span></strong></p>
  </td>
  <td width=48 style='width:36.0pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
  <p><strong>蕴含 </strong></p>
  </td>
  <td width=60 style='width:45.0pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
  <p align=center style='text-align:center'><strong><span lang=EN-US>5 </span></strong></p>
  </td>
  <td width=312 style='width:234.0pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
  <p>第一个操作数为真，第二个操作数为假时，结果才为假，其余都为真 </p>
  </td>
  <td width=96 style='width:72.0pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
  <p><strong><span lang=EN-US>T Imp F </span></strong></p>
  <p><strong><span lang=EN-US>T Imp T </span></strong></p>
  </td>
  <td width=55 style='width:41.25pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
  <p><strong><span lang=EN-US>F </span></strong></p>
  <p><strong><span lang=EN-US>T </span></strong></p>
  </td>
 </tr>
</table>

<p><strong>说明： </strong></p>

<p>　　　<span lang=EN-US>1） 若有多个条件时， And 必须全部条件为真才为真； Or 只要有一个条件为真就为真。 </span></p>

<p>　　　<span lang=EN-US>2） 如果逻辑运算符对数值进行运算，则以数字的二进制值逐位进行逻辑运算。 And 运算常用于屏蔽某些位； Or 运算常用于把某些位置
1 。 <br>
如： 12 And 7 表示对 1100 与 0111 进行 And 运算，得到二进制值 100 ，结果为十进制 4 。 </span></p>

<p>　　　<span lang=EN-US>3） 对一个数连续进行两次 Xor 操作，可恢复原值。在动画设计中，用 Xor 可恢复原来的背景。 </span></p>

<p><strong><span lang=EN-US>4. 表达式 </span></strong></p>

<p>（<span lang=EN-US>1） 表达式的组成 </span></p>

<p>表达式由常量、变量、运算符、函数和圆括号按一定的规则组成，通过运算后有一个结果，运算结果的类型由数据和运算符共同决定。 </p>

<p>（<span lang=EN-US>2 ） <strong>表达式的书写规则 </strong></span></p>

<p>　　　<span lang=EN-US>1） 乘号不能省略 <br>
2） 括号必须成对出现，均使用圆括号，可以嵌套，但必须配对。 <br>
3） 表达式从左到右在同一基准上书写，无高低、大小之分。 <br>
例： sqr((3*x+y)-z)/(x*y)^4 </span></p>

<p><strong>（<span lang=EN-US>3） 不同数据类型的转换 </span></strong></p>

<p>操作数的数据类型应该符合要求，不同的数据应该转换成同一类型。在算术运算中，如果操作数的数据精度不同，<span lang=EN-US> VB 规定运算结果采用精度较高的数据类型。
</span></p>

<p><strong>（<span lang=EN-US>4） 优先级 </span></strong></p>

<p>同一表达式中，不同运算符的优先级是：算术运算符<span lang=EN-US> &gt; 字符运算符 &gt; 关系运算符 &gt; 逻辑运算符 </span></p>

<p>注意：对于存在多种运算符的表达式，可增加圆括号改变优先级或使表达式更清晰。 </p>

<p align=center style='text-align:center'><strong><span lang=EN-US>2.3 VB 的公共函数
</span></strong></p>

<p><strong><span lang=EN-US>1. 数学函数 </span></strong></p>

<p align=center style='text-align:center'><strong>　　<span lang=EN-US>VB 中常用的数学函数
</span></strong></p>

<table border=1 cellspacing=0 cellpadding=0 style='mso-cellspacing:0cm;
 border:solid windowtext .5pt;mso-padding-alt:0cm 0cm 0cm 0cm'>
 <tr>
  <td width=103 style='width:77.25pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
  <p align=center style='text-align:center'><strong>函数名 </strong></p>
  </td>
  <td width=372 style='width:279.0pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
  <p align=center style='text-align:center'><strong>功能 </strong></p>
  </td>
  <td width=96 style='width:72.0pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
  <p align=center style='text-align:center'><strong>示例 </strong></p>
  </td>
  <td width=79 style='width:59.25pt;border:solid windowtext .5pt;padding:0cm 0cm 0cm 0cm'>
  <p align=center style='text-align:center'><strong>结果 </strong></p>
  </td>
 </tr>
 <tr>
  <td width=103 valign=top style='width:77.25pt;border:solid windowtext .5pt;
  padding:0cm 0cm 0cm 0cm'>
  <p align=center style='text-align:center'><span lang=EN-US>Sqr （ x ） </span></p>
  </td>
  <td width=372 valign=top style='width:279.0pt;border:solid windowtext .5pt;
  padding:0cm 0cm 0cm 0cm'>
  <p>求平方根 </p>
  </td>
  <td width=96 valign=top style='width:72.0pt;border:solid windowtext .5pt;
  padding:0cm 0cm 0cm 0cm'>
  <p align=center style='text-align:center'><span lang=EN-US>Sqr （ 9 ） </span></p>
  </td>
  <td width=79 valign=top style='width:59.25pt;border:solid windowtext .5pt;
  padding:0cm 0cm 0cm 0cm'>
  <p align=center style='text-align:center'><span lang=EN-US>3 </span></p>
  </td>
 </tr>
 <tr>
  <td width=103 valign=top style='width:77.25pt;border:solid windowtext .5pt;
  padding:0cm 0cm 0cm 0cm'>
  <p align=center style='text-align:center'><span lang=EN-US>Log （ x ） </span></p>
  </td>
  <td width=372 valign=top style='width:279.0pt;border:solid windowtext .5pt;
  padding:0cm 0cm 0cm 0cm'>
  <p>求自然对数，<span lang=EN-US> x&gt;0 </span></p>
  </td>
  <td width=96 valign=top style='width:72.0pt;border:solid windowtext .5pt;
  padding:0cm 0cm 0cm 0cm'>
  <p align=center style='text-align:center'><span lang=EN-US>Log （ 10 ） </span></p>
  </td>
  <td width=79 valign=top style='width:59.25pt;border:solid windowtext .5pt;
  padding:0cm 0cm 0cm 0cm'>
  <p align=center style='text-align:center'><span lang=EN-US>2.3 </span></p>
  </td>
 </tr>
 <tr>
  <td width=103 valign=top style='width:77.25pt;border:solid windowtext .5pt;
  padding:0cm 0cm 0cm 0cm'>
  <p align=center style='text-align:center'><span lang=EN-US>Exp （ x ） </span></p>
  </td>
  <td width=372 valign=top style='width:279.0pt;border:solid windowtext .5pt;
  padding:0cm 0cm 0cm 0cm'>
  <p>求以<span lang=EN-US> e 为底的幂值 , 即求 e x </span></p>
  </td>
  <td width=96 valign=top style='width:72.0pt;border:solid windowtext .5pt;
  padding:0cm 0cm 0cm 0cm'>
  <p align=center style='text-align:center'><span lang=EN-US>Exp （ 3 ） </span></p>
  </td>
  <td width=79 valign=top style='width:59.25pt;border:solid windowtext .5pt;
  padding:0cm 0cm 0cm 0cm'>
  <p align=center style='text-align:center'><span lang=EN-US>20.086 </span></p>
  </td>
 </tr>
 <tr>
  <td width=103 valign=top style='width:77.25pt;border:solid windowtext .5pt;
  padding:0cm 0cm 0cm 0cm'>
  <p align=center style='text-align:center'><span lang=EN-US>Abs （ x ） </span></p>
  </td>
  <td width=372 valign=top style='width:279.0pt;border:solid windowtext .5pt;
  padding:0cm 0cm 0cm 0cm'>
  <p>求<span lang=EN-US> x 的绝对值 </span></p>
  </td>
  <td width=96 valign=top style='width:72.0pt;border:solid windowtext .5pt;
  padding:0cm 0cm 0cm 0cm'>
  <p align=center style='text-align:center'><span lang=EN-US>Abs （ -2.5 ） </span></p>
  </td>
  <td width=79 valign=top style='width:59.25pt;border:solid windowtext .5pt;
  padding:0cm 0cm 0cm 0cm'>
  <p align=center style='text-align:center'><span lang=EN-US>2.5 </span></p>
  </td>
 </tr>
 <tr>
  <td width=103 valign=top style='width:77.25pt;border:solid windowtext .5pt;
  padding:0cm 0cm 0cm 0cm'>
  <p align=center style='text-align:center'><span lang=EN-US>Hex[$] （ x ） </span></p>
  </td>
  <td width=372 valign=top style='width:279.0pt;border:solid windowtext .5pt;
  padding:0cm 0cm 0cm 0cm'>
  <p>求<span lang=EN-US> x 的十六进制数，返回的是字符型值 </span></p>
  </td>
  <td width=96 valign=top style='width:72.0pt;border:solid windowtext .5pt;
  padding:0cm 0cm 0cm 0cm'>
  <p align=center style='text-align:center'><span lang=EN-US>Hex[$] （ 28 ） </span></p>
  </td>
  <td width=79 valign=top style='width:59.25pt;border:solid windowtext .5pt;
  padding:0cm 0cm 0cm 0cm'>
  <p align=center style='text-align:center'><span lang=EN-US>&quot;1C&quot; </span></p>
  </td>
 </tr>
 <tr>
  <td width=103 valign=top style='width:77.25pt;border:solid windowtext .5pt;
  padding:0cm 0cm 0cm 0cm'>
  <p align=center style='text-align:center'><span lang=EN-US>Oct[$] （ x ） </span></p>
  </td>
  <td width=372 valign=top style='width:279.0pt;border:solid windowtext .5pt;
  padding:0cm 0cm 0cm 0cm'>
  <p>求<span lang=EN-US> x 的八进制数，返回的是字符型值 </span></p>
  </td>
  <td width=96 valign=top style='width:72.0pt;border:solid windowtext .5pt;
  padding:0cm 0cm 0cm 0cm'>
  <p align=center style='text-align:center'><span lang=EN-US>Oct[$] （ 10 ） </span></p>
  </td>
  <td width=79 valign=top style='width:59.25pt;border:solid windowtext .5pt;
  padding:0cm 0cm 0cm 0cm'>
  <p align=center style='text-align:center'><span lang=EN-US>&quot;12&quot; </span></p>
  </td>
 </tr>
 <tr>
  <td width=103 valign=top style='width:77.25pt;border:solid windowtext .5pt;
  padding:0cm 0cm 0cm 0cm'>
  <p align=center style='text-align:center'><span lang=EN-US>Sgn(x) </span></p>
  </td>
  <td width=372 valign=top style='width:279.0pt;border:solid windowtext .5pt;
  padding:0cm 0cm 0cm 0cm'>
  <p>求<span lang=EN-US> x 的符号 , 当 x&gt;0, 返回 1 ； x=0, 返回 0 ； x&lt;0, 返回 -1 </span></p>
  </td>
  <td width=96 valign=top style='width:72.0pt;border:solid windowtext .5pt;
  padding:0cm 0cm 0cm 0cm'>
  <p align=center style='text-align:center'><span lang=EN-US>Sgn(15) </span></p>
  </td>
  <td width=79 valign=top style='width:59.25pt;border:solid windowtext .5pt;
  padding:0cm 0cm 0cm 0cm'>
  <p align=center style='text-align:center'><span lang=EN-US>1 </span></p>
  </td>
 </tr>
 <tr>
  <td width=103 valign=top style='width:77.25pt;border:solid windowtext .5pt;
  padding:0cm 0cm 0cm 0cm'>
  <p align=center style='text-align:center'><span lang=EN-US>Rnd(x) </span></p>
  </td>
  <td width=372 valign=top style='width:279.0pt;border:solid windowtext .5pt;
  padding:0cm 0cm 0cm 0cm'>
  <p>产生一个在（<span lang=EN-US> 0 ， 1 ）区间均匀分布的随机数，每次的值都不同；若 x=0 ，则给出的是上一次本函数产生的随