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

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