王可欣廊坊师范学院信息技术提高班十二期

前言：在机房收费系统中，我们遇到最多的不是bug，而是选择！1、if语句（1）行if 语句（占一个语句行，没有end if ）格式：if 条件 then 语句组1 [else 语句2]

例如：

if x>0 then print x Else print –x;

（如果饿了，吃饭；[不饿，不吃，反正就是不吃饭]。）（2）块if语句(注意格式)If 条件then[语句组1][Else[语句组2]]End if 先判断条件是否成立，成立，执行语句组1，不成立，执行语句组2.If x>0 then Print xElsePrint-xEnd if (个人认为，块if比行if区别在，块if较复杂，要分段，有end if 。在块if中又可以嵌套，可以添加行if 或者再添加块if，块if 是一个框架。)2、使用elseif块 if中可以使用elseif字句，语法如下：If 条件1 then[语句组1][Elseif 条件2 then[语句组2][Elseif 条件3] then[语句组3] then……[else[语句组n]]End if

例如

Sub form_click()Dim I as intengerIf i=1 thenForm1.showElseif i=2 thenForm2.showElseif i=3 thenUnload me End if (只有一个if 对应着end if )End sub等同于

<pre name="code" class="html">Sub form_click()If i=1 thenForm1.showElseIf i=2 thenForm2.showElseIf i=3 thenUnload meEnd ifEnd ifEnd if(很多嵌套，比elseif复杂了很多)End sub

Elseif 的使用简化了很多嵌套，格式整齐。3、selec case语句（用于构造多分支选择结构）表达式

select case[case 表达式列表1[语句块1]][case 表达式列表2[语句块2]]……Case else[语句块]End select Select case 语句执行时，首先计算测试表达式的值，然后用该值依次测试各个表达式列表，，如果在某个列表中找到匹配的表达式，则执行该case语句之后的语句块，然后执行end select语句之后的语句。如果所有的表达式都不能匹配，执行case else后的句子。常见形式：（1）单独的常量。 Case1,3,5,”a”,”b”（2）用to 制定范围。例如，case 2 to 10,”abc”to “xyz”（3）用is指定条件。 Case is<60,is >90.（4）前面三种混合。Case 1,3,5,10 to 20,is >60见机房中结账时用sstab时的选择。(部分代码)

当你感到悲哀痛苦时，最好是去学些什么东西。

相关文章：

你感兴趣的文章：

标签云：