📄 4.htm

📁 vb基础教程源文件处学者必备
💻 HTM
📖 第 1 页 / 共 3 页
字号:
上一页 1 23
  <table border=0 cellpadding=0 style='mso-cellspacing:1.5pt'>
   <tr>
    <td width="9%" rowspan=2 style='width:9.0%;padding:.75pt .75pt .75pt .75pt'>
    <p class=MsoNormal><strong>例： </strong></p>
    </td>
    <td width="5%" rowspan=2 style='width:5.0%;padding:.75pt .75pt .75pt .75pt'>
    <p class=MsoNormal><span lang=EN-US><img width=13 height=22
    id="_x0000_i1043" src="2_image434.gif"></span></p>
    </td>
    <td width="86%" style='width:86.0%;padding:.75pt .75pt .75pt .75pt'>
    <p class=MsoNormal><strong><span lang=EN-US>x 2 -5 x ≠ 0 </span></strong></p>
    </td>
   </tr>
   <tr>
    <td style='padding:.75pt .75pt .75pt .75pt'>
    <p class=MsoNormal><strong><span lang=EN-US>3x +2 x=0 </span></strong></p>
    </td>
   </tr>
  </table>
  <p style='margin:0cm;margin-bottom:.0001pt'><span lang=EN-US
  style='display:none;mso-hide:all'><![if !supportEmptyParas]>&nbsp;<![endif]><o:p></o:p></span></p>
  <table border=0 cellpadding=0 style='mso-cellspacing:1.5pt'>
   <tr>
    <td style='padding:.75pt .75pt .75pt .75pt'>
    <p class=MsoNormal><span lang=EN-US><img width=300 height=174
    id="_x0000_i1044" src=image435.jpg></span></p>
    </td>
   </tr>
   <tr>
    <td style='padding:.75pt .75pt .75pt .75pt'>
    <p class=MsoNormal><span lang=EN-US><img width=253 height=355
    id="_x0000_i1045" src=image432.jpg></span></p>
    </td>
   </tr>
  </table>
  <p class=MsoNormal><span lang=EN-US><o:p></o:p></span></p>
  </td>
 </tr>
 <tr>
  <td width=26 valign=top style='width:19.5pt;background:white;padding:0cm 0cm 0cm 0cm'>
  <p><strong><span lang=EN-US>(3)If …… Then …… ElseIf 语句（多分支结构） </span></strong><span
  lang=EN-US><br>
  语句形式： <b><br>
  <strong>　 If &lt; 表达式 1 &gt; Then </strong></b><br>
  &lt; 语句块 1&gt; <b><br>
  <strong>　　　 ElseIf &lt; 表达式 2 &gt; Then </strong></b><br>
  &lt; 语句块 2&gt; <br>
  <strong>…… </strong><b><br>
  <strong>　　 [ Else </strong></b>语句块 n+1 <strong>] </strong><br>
  <strong>End If </strong></span></p>
  <table border=0 cellpadding=0 style='mso-cellspacing:1.5pt'>
   <tr>
    <td style='padding:.75pt .75pt .75pt .75pt'>
    <p class=MsoNormal><span lang=EN-US><img width=373 height=281
    id="_x0000_i1046" src="2_image436.gif"></span></p>
    </td>
   </tr>
  </table>
  <p><strong>注意 </strong>： </p>
  <p>　　　<span lang=EN-US>1 ）不管有几个分支，程序执行了一个分支后，其余分支不再执行； <br>
  2 ） <strong>ElseIf </strong>不能写成 <strong>Else If </strong><br>
  3 ）当多分支中有多个表达式同时满足，则只执行第一个与之匹配的语句块 </span></p>
  <p><strong>例 </strong>：已知变量<span lang=EN-US> strC 中存放了一个字符，判断该字符是字母字符、数字字符还是其他字符。
  </span></p>
  <table border=0 cellpadding=0 style='mso-cellspacing:1.5pt'>
   <tr>
    <td style='padding:.75pt .75pt .75pt .75pt'>
    <p class=MsoNormal><span lang=EN-US><img width=245 height=137
    id="_x0000_i1047" src="2_image437.jpg"></span></p>
    </td>
   </tr>
   <tr>
    <td style='padding:.75pt .75pt .75pt .75pt'>
    <p class=MsoNormal></p>
    </td>
   </tr>
  </table>
  <p><strong>（<span lang=EN-US>4） If 语句的嵌套 </span></strong></p>
  <p><span lang=EN-US>If 语句的嵌套是指 if 或 else 后面的语句块中又包含 If 语句。语句形式： </span></p>
  <p><strong><span lang=EN-US>If &lt; 表达式 1 &gt; Then </span></strong><b><span
  lang=EN-US><br>
  <strong>If &lt; 表达式 11 &gt; Then </strong></span></b><span lang=EN-US><br>
  <strong>…… </strong><br>
  <strong>End If </strong><br>
  <strong>…… </strong><br>
  <strong>End If </strong></span></p>
  <p><strong>注意： </strong><span lang=EN-US><br>
  　　 1 ）对于嵌套结构，为了增强程序的可读性，应该采用缩进形式书写； <br>
  2 ） If 语句形式若不在一行上书写，必须与 End If 配对，多个 if 嵌套， End If 与它最接近的 Emd If 配对。 <br>
  <strong>例 </strong>： 已知 x 、 y 、 z 三个数，比较它们的大小并排序，使得 x&gt;y&gt;z. </span></p>
  <table border=0 cellpadding=0 style='mso-cellspacing:1.5pt'>
   <tr>
    <td style='padding:.75pt .75pt .75pt .75pt'>
    <p class=MsoNormal></p>
    </td>
   </tr>
   <tr>
    <td style='padding:.75pt .75pt .75pt .75pt'>
    <p class=MsoNormal></p>
    </td>
   </tr>
  </table>
  <p><strong><span lang=EN-US>2. Select Case 语句（情况语句） </span></strong>是多分支语句的又一种形式，语句形式：
  </p>
  <p><strong>　　<span lang=EN-US>Select Case 变量或表达式 </span></strong><b><span
  lang=EN-US><br>
  <strong>Case 表达式列表 1 </strong></span></b><span lang=EN-US><br>
  <strong>语句块 1 </strong><br>
  <strong>　　Case 表达式列表 2 </strong><b><br>
  <strong>语句块 2 </strong></b><br>
  <strong>…… </strong><b><br>
  <strong>　　　 　　 [ Case Else </strong></b></span></p>
  <p><strong>语句块<span lang=EN-US> n+1 ] </span></strong><b><span lang=EN-US><br>
  <strong>End Select </strong></span></b></p>
  <table border=0 cellspacing=0 cellpadding=0 style='mso-cellspacing:0cm;
   mso-padding-alt:0cm 0cm 0cm 0cm'>
   <tr>
    <td style='padding:0cm 0cm 0cm 0cm'>
    <p class=MsoNormal><span lang=EN-US><img width=253 height=323
    id="_x0000_i1051" src=image445.gif></span></p>
    </td>
   </tr>
  </table>
  <p><strong>说明： </strong><span lang=EN-US>1 ） 变量或表达式 可以是数值型或字符串表达式 </span></p>
  <p>　<span lang=EN-US>2 ） 表达式列表 I 可以是表达式、一组用逗号分隔的枚举值、表达式 1 to 表达式 2 、 Is 关系运算符表达式；如：
  <strong>case 1 to 10 、 case
  &quot;a&quot;,&quot;w&quot;,&quot;e&quot;,&quot;t&quot; 、 case 2,4,6,8,is&gt;10
  </strong></span></p>
  <p>　 <span lang=EN-US>3 ）并不是所有的多分支结构都可以用情况语句代替的。 </span></p>
  <p><strong>例 </strong>：已知输入某课程的百分制成绩<span lang=EN-US> mark ，要求显示对应五级制的评定，评定条件如下：
  </span></p>
  <table border=0 cellspacing=0 cellpadding=0 style='mso-cellspacing:0cm;
   mso-padding-alt:0cm 0cm 0cm 0cm'>
   <tr>
    <td width=116 style='width:87.0pt;padding:0cm 0cm 0cm 0cm'>
    <p class=MsoNormal>优 </p>
    </td>
    <td width=123 style='width:92.25pt;padding:0cm 0cm 0cm 0cm'>
    <p class=MsoNormal>良 </p>
    </td>
    <td width=118 style='width:88.5pt;padding:0cm 0cm 0cm 0cm'>
    <p class=MsoNormal>中 </p>
    </td>
    <td width=123 style='width:92.25pt;padding:0cm 0cm 0cm 0cm'>
    <p class=MsoNormal>及格 </p>
    </td>
    <td width=116 style='width:87.0pt;padding:0cm 0cm 0cm 0cm'>
    <p class=MsoNormal>不及格 </p>
    </td>
   </tr>
   <tr>
    <td style='padding:0cm 0cm 0cm 0cm'>
    <p class=MsoNormal><span lang=EN-US>80 ≤mark ＜90 </span></p>
    </td>
    <td style='padding:0cm 0cm 0cm 0cm'>
    <p class=MsoNormal><span lang=EN-US>70≤mark ＜80 </span></p>
    </td>
    <td style='padding:0cm 0cm 0cm 0cm'>
    <p class=MsoNormal><span lang=EN-US>60≤mark ＜70 </span></p>
    </td>
    <td style='padding:0cm 0cm 0cm 0cm'>
    <p class=MsoNormal><span lang=EN-US>60≤ mark＜70 </span></p>
    </td>
    <td style='padding:0cm 0cm 0cm 0cm'>
    <p class=MsoNormal><span lang=EN-US>60＜mark </span></p>
    </td>
   </tr>
  </table>
  <p class=MsoNormal><span lang=EN-US style='display:none;mso-hide:all'><![if !supportEmptyParas]>&nbsp;<![endif]><o:p></o:p></span></p>
  <table border=0 cellspacing=0 cellpadding=0 style='mso-cellspacing:0cm;
   mso-padding-alt:0cm 0cm 0cm 0cm'>
   <tr>
    <td style='padding:0cm 0cm 0cm 0cm'>
    <p class=MsoNormal><span lang=EN-US><img width=275 height=123
    id="_x0000_i1052" src="2_image449.jpg"></span></p>
    </td>
   </tr>
   <tr>
    <td style='padding:0cm 0cm 0cm 0cm'>
    <p class=MsoNormal><span lang=EN-US><img width=253 height=270
    id="_x0000_i1053" src=image450.jpg></span></p>
    </td>
   </tr>
  </table>
  <p class=MsoNormal><span lang=EN-US><o:p></o:p></span></p>
  </td>
 </tr>
 <tr>
  <td style='padding:0cm 0cm 0cm 0cm'>
  <p><strong><span lang=EN-US>3. 条件函数 </span></strong></p>
  <p><strong>（<span lang=EN-US>1） if 函数 </span></strong></p>
  <p>函数形式： <strong><span lang=EN-US>Iif （表达式， 当条件为 True 时的值 ， 当条件为 False 时的值 </span></strong><b><span
  lang=EN-US><br>
  </span></b>例：求<span lang=EN-US> X 、 Y 中大的数，并放入变量 Tmax 中： <strong>Tmax=Iif （
  X&gt;Y, X, Y ） </strong></span></p>
  <p><strong>（<span lang=EN-US>2） Choose 函数 </span></strong></p>
  <p>函数形式： <strong><span lang=EN-US>Choose （整数表达式，选项列表） </span></strong><span
  lang=EN-US><br>
  如果整数表达式的值是 1 ，则选择列表中的第 1 项，依次类推；如果小于 1 或大于列表项数时，则返回 NULL 。 <br>
  例： 根据 nub 为 1 -4 的值，换算成不同的运算符： OP= <strong>Choose （ nub, “＋”，“－”，“×”，“÷”） </strong></span></p>
  <p><b><span lang=EN-US><br>
  <strong>4.3 循环结构 </strong></span></b></p>
  <p>循环是在指定的条件下多次重复执行一组语句。 <span lang=EN-US>VB 中提供了两种类型的循环语句： </span></p>
  <p><strong>计数循环语句 </strong>和 <strong>条件型循环语句 </strong></p>
  <p><strong><span lang=EN-US>1. For 循环语句（知道循环次数的计数型循环） </span></strong></p>
  <p>语句形式： <strong><span lang=EN-US>For 循环变量 = 初值 To 终值 [ Step 步长 ] </span></strong><span
  lang=EN-US><br>
  <strong>语句块 </strong><b><br>
  <strong>[ Exit For ] </strong><br>
  <strong>语句块 </strong><br>
  <strong>Next 循环变量 </strong></b></span></p>
  </td>
 </tr>
</table>

<p class=MsoNormal><span lang=EN-US style='display:none;mso-hide:all'><![if !supportEmptyParas]>&nbsp;<![endif]><o:p></o:p></span></p>

<table border=0 cellspacing=0 cellpadding=0 style='mso-cellspacing:0cm;
 mso-padding-alt:0cm 0cm 0cm 0cm'>
 <tr>
  <td style='padding:0cm 0cm 0cm 0cm'>
  <p class=MsoNormal><span lang=EN-US><img width=241 height=386
  id="_x0000_i1054" src=image452.gif></span></p>
  </td>
 </tr>
</table>

<p class=MsoNormal><span lang=EN-US><![if !supportEmptyParas]>&nbsp;<![endif]><o:p></o:p></span></p>

</div>

</body>

</html>
上一页 1 23
⌨️ 快捷键说明

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