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

📄 4.htm

📁 vb基础教程源文件 处学者必备
💻 HTM
📖 第 1 页 / 共 3 页
字号:
  <table border=0 cellspacing=0 cellpadding=0 style='mso-cellspacing:0cm;
   mso-padding-alt:0cm 0cm 0cm 0cm'>
   <tr>
    <td width=10 style='width:7.2pt;padding:0cm 0cm 0cm 0cm'>
    <p class=MsoNormal><![if !supportEmptyParas]>&nbsp;<![endif]><span
    lang=EN-US><o:p></o:p></span></p>
    </td>
    <td width=193 style='width:144.75pt;padding:0cm 0cm 0cm 0cm'>
    <p class=MsoNormal><![if !supportEmptyParas]>&nbsp;<![endif]><span
    lang=EN-US><o:p></o:p></span></p>
    </td>
    <td width=83 style='width:62.25pt;padding:0cm 0cm 0cm 0cm'>
    <p class=MsoNormal><![if !supportEmptyParas]>&nbsp;<![endif]><span
    lang=EN-US><o:p></o:p></span></p>
    </td>
    <td width=217 style='width:162.75pt;padding:0cm 0cm 0cm 0cm'>
    <p class=MsoNormal><![if !supportEmptyParas]>&nbsp;<![endif]><span
    lang=EN-US><o:p></o:p></span></p>
    </td>
   </tr>
   <tr>
    <td style='padding:0cm 0cm 0cm 0cm'>
    <p class=MsoNormal><![if !supportEmptyParas]>&nbsp;<![endif]><span
    lang=EN-US><o:p></o:p></span></p>
    </td>
    <td rowspan=2 valign=top style='padding:0cm 0cm 0cm 0cm'>
    <p class=MsoNormal><span lang=EN-US><img width=193 height=277
    id="_x0000_i1032" src="2_image410.gif"></span></p>
    </td>
    <td style='padding:0cm 0cm 0cm 0cm'>
    <p class=MsoNormal><![if !supportEmptyParas]>&nbsp;<![endif]><span
    lang=EN-US style='font-size:10.0pt;font-family:"Times New Roman"'><o:p></o:p></span></p>
    </td>
    <td style='padding:0cm 0cm 0cm 0cm'>
    <p class=MsoNormal><![if !supportEmptyParas]>&nbsp;<![endif]><span
    lang=EN-US style='font-size:10.0pt;font-family:"Times New Roman"'><o:p></o:p></span></p>
    </td>
   </tr>
   <tr>
    <td style='padding:0cm 0cm 0cm 0cm'>
    <p class=MsoNormal><![if !supportEmptyParas]>&nbsp;<![endif]><span
    lang=EN-US><o:p></o:p></span></p>
    </td>
    <td style='padding:0cm 0cm 0cm 0cm'>
    <p class=MsoNormal><![if !supportEmptyParas]>&nbsp;<![endif]><span
    lang=EN-US><o:p></o:p></span></p>
    </td>
    <td rowspan=2 valign=top style='padding:0cm 0cm 0cm 0cm'>
    <p class=MsoNormal><span lang=EN-US><img width=217 height=287
    id="_x0000_i1033" src="2_image411.gif"></span></p>
    </td>
   </tr>
   <tr>
    <td style='padding:0cm 0cm 0cm 0cm'>
    <p class=MsoNormal><![if !supportEmptyParas]>&nbsp;<![endif]><span
    lang=EN-US><o:p></o:p></span></p>
    </td>
    <td style='padding:0cm 0cm 0cm 0cm'>
    <p class=MsoNormal><![if !supportEmptyParas]>&nbsp;<![endif]><span
    lang=EN-US style='font-size:10.0pt;font-family:"Times New Roman"'><o:p></o:p></span></p>
    </td>
    <td style='padding:0cm 0cm 0cm 0cm'>
    <p class=MsoNormal><![if !supportEmptyParas]>&nbsp;<![endif]><span
    lang=EN-US style='font-size:10.0pt;font-family:"Times New Roman"'><o:p></o:p></span></p>
    </td>
   </tr>
  </table>
  <p><strong><span lang=EN-US>6. 算法示例 </span></strong></p>
  <p>(<span lang=EN-US>1) </span></p>
  <table border=0 cellspacing=0 cellpadding=0 style='mso-cellspacing:0cm;
   mso-padding-alt:0cm 0cm 0cm 0cm'>
   <tr>
    <td width=264 style='width:198.0pt;padding:0cm 0cm 0cm 0cm'>
    <p class=MsoNormal><![if !supportEmptyParas]>&nbsp;<![endif]><span
    lang=EN-US><o:p></o:p></span></p>
    </td>
   </tr>
   <tr>
    <td style='padding:0cm 0cm 0cm 0cm'>
    <p class=MsoNormal><span lang=EN-US><img width=321 height=133
    id="_x0000_i1034" src="2_image412.jpg"></span></p>
    </td>
    <td style='padding:0cm 0cm 0cm 0cm'>
    <p class=MsoNormal><![if !supportEmptyParas]>&nbsp;<![endif]><span
    lang=EN-US><o:p></o:p></span></p>
    </td>
   </tr>
  </table>
  <p><span lang=EN-US><br>
  欧几里德算法——求两个自然数的最大公约数 </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=193 height=479
    id="_x0000_i1035" src="2_image413.gif"></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 cellpadding=0 style='mso-cellspacing:1.5pt'>
   <tr>
    <td style='padding:.75pt .75pt .75pt .75pt'>
    <p class=MsoNormal><span lang=EN-US><img width=324 height=254
    id="_x0000_i1036" src="2_image415.jpg"></span></p>
    </td>
   </tr>
  </table>
  <p>(<span lang=EN-US>2) 顺序查找算法—— 在 N 个字符串集合中,查找有无特定的字符串存在 </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=600 height=600
    id="_x0000_i1037" src="2_image418.gif"></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 width=288 style='width:216.0pt;padding:0cm 0cm 0cm 0cm'>
    <p class=MsoNormal><![if !supportEmptyParas]>&nbsp;<![endif]><span
    lang=EN-US><o:p></o:p></span></p>
    </td>
   </tr>
   <tr>
    <td style='padding:0cm 0cm 0cm 0cm'>
    <p class=MsoNormal><span lang=EN-US><img width=309 height=174
    id="_x0000_i1038"
    src="http://219.219.90.5/jcy/?t????ê??¨μ?×êá?/VB/vbweb/study/images/image419.png"></span></p>
    </td>
    <td style='padding:0cm 0cm 0cm 0cm'>
    <p class=MsoNormal><![if !supportEmptyParas]>&nbsp;<![endif]><span
    lang=EN-US><o:p></o:p></span></p>
    </td>
   </tr>
  </table>
  <p class=MsoNormal><span lang=EN-US><br>
  <strong>4.2 顺序结构 </strong></span></p>
  <p><strong> <span lang=EN-US>1. 赋值语句 </span></strong></p>
  <p>赋值语句是任何程序设计中最基本的语句,赋值语句都时顺序执行的。赋值语句的形式为: </p>
  <p><strong>变量名<span lang=EN-US> = 表达式 </span></strong></p>
  <p>它的作用是计算右边表达式的值,然后赋给左边的变量,表达式的类型应该与变量名的类型一致。 </p>
  <p><strong><span lang=EN-US>2. 使用说明 </span></strong></p>
  <p>(<span lang=EN-US>1) 当表达式为数值型而与变量精度不同时,强制转换成左边变量的精度; <br>
  (2) 当表达式是数字字符串,左边变量是数值类型,自动转换成数值类型再赋值,但当表达式中有非数字字符或空串,则出错。 <br>
  (3) 任何非字符类型赋值给字符类型,自动转换为字符类型; <br>
  (4) 当逻辑型赋值给数值型时, True 转换为 -1 , False 转换为 0 ;反之,非 0 转换为 True , 0 转换为 False ; <br>
  (5) 赋值号左边的变量只能是变量,不能是常量、常数符号、表达式,否则报错; <br>
  (6) 不能在一句赋值语句中,同时给各变量赋值; <br>
  (7) 在条件表达式中出现的 <strong>= </strong>是等号,系统会根据 <strong>= </strong>号的位置,自动判断是否为赋值号;
  <br>
  (8) 注意 N=N+1 是累加中常见的赋值语句,表示将 N 变量中的值加 1 后再赋值给 N 。 </span></p>
  <table border=0 cellpadding=0 style='mso-cellspacing:1.5pt'>
   <tr>
    <td width="17%" style='width:17.0%;padding:.75pt .75pt .75pt .75pt'>
    <p class=MsoNormal><span lang=EN-US>N </span></p>
    </td>
    <td width="55%" style='width:55.0%;padding:.75pt .75pt .75pt .75pt'>
    <p class=MsoNormal>执行了<span lang=EN-US> N=N+1 后 </span></p>
    </td>
    <td width="28%" style='width:28.0%;padding:.75pt .75pt .75pt .75pt'>
    <p class=MsoNormal><span lang=EN-US>N </span></p>
    </td>
   </tr>
   <tr>
    <td width="17%" style='width:17.0%;padding:.75pt .75pt .75pt .75pt'>
    <p class=MsoNormal><span lang=EN-US>5 </span></p>
    </td>
    <td style='padding:.75pt .75pt .75pt .75pt'>
    <p class=MsoNormal><span lang=EN-US><img width=181 height=12
    id="_x0000_i1039" src="2_image422.gif"></span></p>
    </td>
    <td width="28%" style='width:28.0%;padding:.75pt .75pt .75pt .75pt'>
    <p class=MsoNormal><span lang=EN-US>6 </span></p>
    </td>
   </tr>
  </table>
  <p align=center style='text-align:center'><strong><span lang=EN-US>4.3 选择结构(或称分支结构)
  </span></strong></p>
  <p><strong><span lang=EN-US>1.1. IF条件语句 </span></strong><b><span lang=EN-US><br>
  <br>
  </span></b>(<span lang=EN-US>1)If……Then语句(单分支结构 F) <br>
      语句形式: <b><br>
  <strong>     1) If &lt; 表达式 &gt; Then </strong><br>
  <strong>         语句块 </strong><br>
  <strong>       End If </strong></b></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=193 height=212
    id="_x0000_i1040" src="2_image401.gif"></span></p>
    </td>
   </tr>
  </table>
  <p><strong>   <span lang=EN-US>2 ) If &lt; 表达式 &gt; Then &lt; 语句 &gt; </span></strong></p>
  <p><strong>说明 </strong>: 表达式一般为关系表达式、逻辑表达式,也可以为算术表达式,非<span lang=EN-US> 0 为
  True , 0 为 False ; </span></p>
  <p>语句块可以是一句或多句,若用<span lang=EN-US> 2 )表示,则只能是一句语句,若多句,语句间需用冒号分隔,而且必须在一行上书写。 </span></p>
  <p>例:已知两个数<span lang=EN-US> x 和 y ,比较它们的大小,使得 x 大于 y : </span></p>
  <p><strong>方法一:<span lang=EN-US> if x&lt;&gt; </span></strong><span
  lang=EN-US><br>
  <strong>t=x </strong><b><br>
  <strong>x=y </strong><br>
  <strong>y=t </strong><br>
  <strong>end if </strong></b></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=157 height=85
    id="_x0000_i1041" src="2_image430.gif"></span></p>
    </td>
   </tr>
  </table>
  <p><strong>方法二:<span lang=EN-US> if x </span></strong></p>
  <p><strong>注意: </strong>将两个变量中的数进行交换时,必须借助于第三个变量才能实现。 </p>
  <p><strong><span lang=EN-US>(2) If …… Then …… Else 语句(双分支结构) </span></strong><span
  lang=EN-US><br>
  语句形式: <br>
  <strong>1 ) If &lt; 表达式 &gt; Then </strong><br>
  &lt; 语句块 1&gt; <br>
  <strong>Else </strong><b><br>
  </b>&lt; 语句块 2&gt; <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=313 height=187
    id="_x0000_i1042" src=image431.gif></span></p>
    </td>
   </tr>
  </table>
  <p><strong><span lang=EN-US>2 ) If &lt; 表达式 &gt; Then &lt; 语句 1 &gt; Else
  &lt; 语句 2 &gt; </span></strong></p>

⌨️ 快捷键说明

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