复 习
一、VB的数据类型
Boolean(布尔型): 类型说明符：Boolean，占用2字节 Byte(字节): 类型说明符：Byte占用1字节.
Integer(整型):类型说明符：Integer，类型标识%,占用2字节. Long(长整型): 类型说明符：Long，类型标识\占用4字节. Single(单精度型): 类型说明符：Single，类型标识\占用4字节. Double(双精度型): 类型说明符：Double，类型标识\占用8字节. Currency(货币型): 类型说明符：Currency，类型标识\占用8字节. Date(日期型): 类型说明符：Date ，占用8字节.
String(字符串,变长): 类型说明符：String，类型标识\二、VB的运算符
赋值运算符:用来给变量或对象的属性赋值.把运算符右边的内容(包括常量,变量,函数返回值或对象的属性)赋给左边的变量或对象.属性.
使用赋值号应注意:
1．赋值号左边必须是变量或对象的属性,不能是数值,常量和表达式. 2．赋值号两端的数据类型应该匹配,不匹配时应进行适当转换. 3．给对象赋值时,只有运行时可改写的对象属性才能被赋值. 数学运算符
∧ 指数运算 - 负号运算符
* / 乘除运算,其中除法所得到的结果为实数 \\ 整除,所得到结果为实际结果的整数部分. MOD 取模运算,两数相除取余数. + - 加减运算. 字符串运算符
& + 连接字符.
&与+连接运算符的区别
&强制两个表达式(它们的类型可能不同)做字符串连接;而当+运算符两边的表达式中混有数值字符串及数值,其结果会是数值的求和,如果都是字符串则作\相加\返回连接起来的字符串. 关系运算符 运算符 = > >= < <= <> 含义 等于 大于 大于等于 小于 小于等于 不等于 含义 取反 与 优先级 1 2 示例 \ \ \23<3 \\说明 当操作数为假时，结果为真 两个操作数均为真时，结果 False False True False True True 示例 Not F Not T T And T 结果 T F T 逻辑运算符 运算符 Not And
结果才为真 F And F T And F F And T T Or T F Or F T Or F F Or T F F F T F T T Or 或 3 两个操作数中有一个为真时，结果为真 三、VB语句与控制 VB赋值语句
用来对一般的变量进行赋值的赋值语句,用关键字LET描述,但一般都省略. 格式:[let]变量或属性=表达式 VB注释语句
引入目的:为程序的阅读和修改提供信息,提高程序的可读性和可维护性. 注释方法有两种:'或REM关键字. 条件分支——IF语句 第一种格式:
if 条件 then 语句 end if
如果条件为true,则执行\语句\否则执行end if后面语句. 第二种格式:
if 条件 then 语句 else 语句 end if
IF语句的第三种格式
If 条件1 then 语句1
else if 条件2 then 语句2 else 语句3 end if
如果条件1为true,则执行语句1,如果为false,则检查条件2,如果条件2为true,则执行语句2,如果条件2为false,则执行语句3.
多重选择语句——select case语句
格式: select case 测试表达式
case 条件1 语句1 ……… case else 语句 end select
VB将测试表达式的值与此同时结构中的每个case的值进行比较,如果相等,就执行与该case 相关的程序段,如果都不等,则执行case else所对应的程序段. 循环语句:Do……Loop语句 第一种格式:
Do While 条件式 [程序段] Loop
当条件为true时,循环继续,直到条件变为False为止. 第二种格式:
Do Until 条件式 [程序段] Loop
当条件为False时,循环继续,直到条件变为true为止. 第三种格式:
Do
[程序段]
Loop While 条件式
当条件式为true时,循环继续进行,直到条件式变为false为止. 第三种格式:
Do
[程序段]
Loop Until 条件式
当条件式为时false,循环继续进行,直到条件式变为true为止 For …Next 语句 语法规则:
For 循环控制变量=初值 To 终值 [step增量] 语句
next 循环控制变量
四、VB函数
VB的数学函数 函数名 Abs Atn Cos Exp Fix Int Log Rnd Sgn Sin Sqr Tan 功能 求绝对值 反正切函数 余弦函数 求指数 取整数,对负数取较大的 取整数,对负数取较小的 求对数 产生一个0～1间的随机数 求数字符号 正弦函数 求平方根 正切函数
VB日期和时间函数 函数名 Date Time Now Year Month Day Weekday Hour Minute Second DateSerial TimeSerial DateValue TimeValue DateAdd DateDiff DatePart 字符串函数 函数名 Len Mid Left Right Ltrim Rtrim Trim 功能 求字符串长度 取给定字符串的子串 从字符串的左边取指定长度的子串 从字符串的右边取指定长度的子串 去掉字符串的前导空格 去掉字符串的尾随空格 去掉字符串的前导和尾随空格 功能 取得系统当前日期 取得系统当前时间 取得系统当前日期和时间 返回指定日期中的年份 返回指定日期中的月份(1-12) 返回指定日期中天(1-31) 返回指定日期为星期几 返回指定时间量中的小时 返回指定时间量中的分钟 返回指定时间量中的秒 返回指定年月日的日期 返回指定小时分秒的时间 将字符串表示的日期转化为Variant日期 将字符串表示的时间转化为Variant时间 返回指定日期加上一定时间间隔后的日期 返回两个日期的时间间隔 返回指定日期的特定部分 五、对象的常用属性（例）
Alignment 设置或返回控件的文本对齐方式
AutoSize 返回或设置控件是否自动改变大小以显示其全部内容 BackColor 返回或设置对象的背景颜色。
ForeColor 返回或设置在对象里显示图片和文本的前景颜色。 BackStyle 返回或设置控件的背景是透明的还是非透明的。 BorderStyle 返回或设置对象的边框样式
Caption 指定显示在窗体标题栏中的文本或指定显示在控件中的文本。 Enabled 返回或设置对象是否能够对用户产生的事件作出反应。 Font 返回或设置对象可用的所有字体、字形、字号 Height 返回或设置对象的高度 Width 返回或设置对象的宽度
Left 返回或设置对象内部的左边与它的容器的左边之间的距离。 Top 返回或设置对象的内顶部和它的容器的顶边之间的距离。 Visible 返回或设置一指示对象为可见或隐藏的值。
Locked 设置为ture时，文本不能被编辑，也不能被复制粘贴。 MultiLine 返回或设置TextBox 控件是否能够接受和显示多行文本。
ScrollBars TextBox 控件的属性MultiLine为真时，可为文本框控件设置水平、垂直滚动条。 Style 命令按钮的该赂性值为1时 ，可修改该命令按钮的背景颜色。 Text 返回或设置文本框控件中包含的文本。 Name 返回或设置字体对象的名字。 六、几种基本算法 解析法 ( P98）
通过分析问题中各要素之间的关系，用最简练的语言或形式化的符号来表达它们的关系，得出解决问题所需的表达式，然后设计程序求解问题的方法称为解析法（参看P100“电阻计算问题”）。
穷举法（P103）
“穷举法”也称为“枚举法”或“列举法”。 穷举法，指在一个有穷的可能的解的集合中，一一列举出集合中的每一个元素，用题目给定的检验条件来判断该元素是否符合条件，若满足条件，则该元素即为问题的一个解；否则，该元素就不是该问题的解（参看P103的IQ问题）。 顺序查找（P117）
当查找的对象没有规律时可用顺序查找方法。顺序查找就是一个一个地按照对象的元素往下查找，直到全部元素都查了一遍。
所谓顺序查找，就是从数据序列中的第1个元素开始，从头到尾逐个查找，直到找到所要的数据或搜索完整个数据序列。这种顺序查找的代码很简单，只需编写一个循环，将数组中各元素依次与目标数进行比较即可（参看下面例题）。
'随机生成10个数（在1到100之间的整数）并输出；再输出其中的最大数及位置号（顺序查找）。
Private Sub Command1_Click()
Dim a(1 To 10) As Integer, i As Integer, Max As Integer, mIndex As Integer Max = 0
Randomize '每次运行时，要产生不同序列的随机数，执行Randomize 语句。 Cls '清除窗体中用PRINT等方法输出的内容。 Print
For i = 1 To 10 '本段循环程序随机产生10个1到100之间的整数并显示出来，同
时还按顺序找出其中的最大数。
a(i) = Int(Rnd * 100) + 1 '利用取整函数Int()、随机函数Rnd(),可让计算机产生一定范围的随
机整数,公式为：Int(Rnd()*(上限 - 下限 + 1 ) )+下限。
Print a(i); '按紧凑格式输出所产生的随机数。 If Max < a(i) Then '按顺序查找10个数中的最大数。
Max = a(i) '依次将查找过程中找到的大数存入变量Max中。 mIndex = i '并将其位置保存到变量mIndex中。
End If '顺序比较完成之后，Max就是10个数中的最大者。 Next i Print Print
Print \最大值 = \所在位置为第 \个位置。\End Sub