高中信息技术 VisualBasic编程基础知识.docVIP

高一信息技术 VB知识点 运算：注意Mod、/、\ (整除) ，And 运算两边同时成立才成立，Or运算一边成立就成立 函数名 功能 应用举例 返回值 Abs(x) 求X的绝对值 Abs(-3.5) 3.5 Int(x) 求不大于X的最大整数 Int(4.1) Int(-4.1) 4 -5 Sqr(x) 求X的算术平方根 Sqr(6) 2.44948 Asc(x) 字符转换为AscII Asc(“A”) 65 Chr(x) AscII转换为字符 Chr(48) “0” Val(x) 数字字符串转换为数值 Val(“-170” -170 Str(x) 数值转换为字符串 Str(-170) “-170” Len(x) 计算字符串的长度 Len(“asd”) 3 Mid(x,n,k) 取字符串X中第n个字符起长度为K的子串 Mid(“abcd”,3,1) “c” 注意：其中Chr（）、Str（）、Mid（）三个函数的值为字符串型，结果要加双引号 赋值语句： 变量名 = 表达式 例：i = i + 1、x = 5+6、i = 6 对象名.属性名 = 表达式 例： Label1.Caption = ”结果” （2）选择语句：行If语句 If 条件表达式 Then 语句 例：If n=10 Then i = i+1 If 条件表达式 Then 语句1 Else 语句2 例：If x 0 Then s=”正数” Else s= ”负数” 块If语句： If 表达式1 Then 语句块1 ElseIf 表达式2 Then 语句块2 　… ElseIf 表达式n Then Else 语句块n+1 End If 虚线部分是可选部分！ 例： If x 90 Then Label1.Caption = ”优秀” ElseIf x 80 Then Label1.Caption = ”良好” Else Label1.Caption = ”及格” EndIf 注意：行if语句只有一行。而块If语句写在多行上，最后需要EndIF结尾 （3）循环语句：For 语句 For 循环变量= 初值 To 终值 Step 步长 　 语句块 Next 循环变量 如果步长为1，step 1可以省略 例如：计算1+3+5…+99 S = 0 For i = 1 to 100 step 2 下一个i加上步长，返回重新判断 s = s + i 下一个i加上步长，返回重新判断 Next i Do 语句 Do While 条件表达式 　语句块 Loop 例如：计算1+3+5…+99 S = 0:i = 1 Do While i = 99 　s = s + i 返回重新判断 i = i + 2 返回重新判断 Loop VB改错类型 错误类型 错误原因 1、要求对象 代码中对象名错误 2、除数为零 表达式中被除数为零 3、溢出 数据所赋的值超出定义的大小范围 4、类型不匹配 数据所赋的值和定义的类型不符 5、缺少end if If……End if没有配对 6、Next没有for For……Next没有配对 7、Loop缺少Do Do while……Loop没有配对 8、下标越界 数组下标超出定义时的下标范围 9、未找到方法或数据成员 对象没有这个属性或方法，例如：Text1.Caption 10、无效的过程调用或参数 函数参数错误，例：sqr（-1）负数不能求平方根 11、子程序或函数未定义 子程序或函数没有定义就使用，标准函数名写错