高中VB必考知识点汇总.doc

1、精品算法和编程VB知识点一、数据类型Integer整数长长整数单精度实体双精度实数String字符类型二、常数和变量1，常数的定义Const常量名称as类型=表达式2、变量的定义Dim变量名称as类型三、运算符1，算术运算符-*/ mod2，字符运算符3，关系运算符、=、=、=、=4，逻辑运算符And not or四、函数1，sin(x)2，cos(x)3，fix(x)4，int(x)5，sqr(x)6、abs(x)五、高考格式：变量=表达式第六，输入语句变量=inputbox( ，)七、输出语句打印内容八、条件语句1，If条件then语句2，If条件then语句1 else语句2或：1、If

2、条件then门End if2、If条件then门1Else门2End if九、周期语句1，for循环变量=初始值to结束值循环体Next循环变量2，do while (until)条件循环体回路或者Do循环体Loop while (until)条件谢谢下载第一节课一、VB的简要介绍VB是visual basic的缩写，是一种视觉程序工具。VB界面简介及相关控件和窗口简介：1、控件工具箱(标签、文本框、按钮控件)2、设计窗口3、“属性”窗口(标签的caption、font属性、文本框的text属性、高亮显示按钮的caption和font属性)4、“代码”窗口二、程序的初步尝试1、界面设计2、进入

3、“代码”窗口，然后编写以下程序：Private Sub Command1_Click()Dim a、b、c as integerA=text1.text引用在文本框1中输入的内容。然后将输入赋给变量aB=text2.textC=a*bText3.text=c或text 3 . text=text 1 . text * text 2 . textEnd Sub3、运行程序单击“运行”“启动”4、调试程序，查看运行结果5，思考：修改程序，将“*”修改为“-”或“/”，然后运行程序。修改为“”。第二届会议一、数据类型1，integer整数只能表示介于-32763767之间的整数。长度为2的整数只能表

4、示介于-2147483683334247483647之间的整数3，单精度实体可用于表示小数点4、string字符型示例：“章句”、“中国”、“123456”案例1: 123.得出10的值。Private Sub Command1_Click()Dim I As integerDim s as integerS=0I=1For I=1 To 10S=s * I下一步I打印End Sub案例2:寻找圆的面积Private Sub Command2_Click()Const pi As Single=3.14Dim r As SingleDim s As SingleR=InputBox(r=)S=

5、pi * r * rPrint 圆的面积s=；sEnd Sub二、运算符1，算术运算符(乘法)、*、/、(除法)、mod(馀数)、-2，关系运算符、=、=、3，字符运算符，4，逻辑运算符Not、and、or方案：如果a=5、b=7、c=-2、d=1，则得出以下结果A BC d and a=5 or not c0 or d0三、函数Sqr(x) x的平方根Abs(x) x的绝对值Int(x)不大于x的最大整数Int(-4.5)的结果为-5Int(4.5)结果为4整理Fix(x)Fix(4.5)结果为4Fix(-4.5)结果为-4Cint(x)/clng(x)舍入四、表达式范例：取得a=1、b=3

6、、c=2、x1=、x2=的值。X1=(-b sqr (b 2-4 * a * c)/(2 * a)X2=(-b-sqr (b 2-4 * a * c)/(2 * a)Private Sub Command1_Click()A=1B=3C=2X1=(-b sqr (b 2-4 * a * c)/(2 * a)X2=(-b-sqr (b 2-4 * a * c)/(2 * a)打印x1打印x2End Sub第三届会议方案的顺序结构一、赋值语句赋值语句的默认格式：变量=表达式其中=是指定符号，用于向左侧变量指定表达式的值二、输入函数格式：inputbox(提示信息、标题、默认值、位置)例如：Priv

7、ate Sub Command1_Click()A=InputBox(A=， InputBox ，12，100，20)End Sub三、输出函数格式：print输出内容说明：1，如果输出内容是数字、变量或表达式，则输出相应的值。如果字符串用引号括起来，则按原样输出。2、输出可以是一个或多个。多个输出内容可以用逗号或分号分隔。使用分号时，下一个输出紧接着上一个输出。如果是逗号，则输出为分区格式。3、输出内容后面没有符号表示下一个PRINT换行输出；如果Print没有输出内容，则输出空行。案例1:(书籍第38页)Private Sub Command1_Click()A=Val(InputBox(

8、a=，输入)B=Val(InputBox(b=，输入)Max=(a b)/2 Abs(a-b)/2Print Max=麦斯End Sub案例：2:为了找到长方体的总面积和体积，我们知道长方体的纵横高度。Private Sub Command1_Click()A=InputBox(a=)B=InputBox(b=)C=InputBox(c=)S=2 * (a * b a * c b * c)V=a * b * cPrint full area S=s，“卷v=”；vEnd Sub第四届会议方案选择结构一、条件语句的形式1，If条件then语句2，If条件then语句1 else语句2或：1、If

9、条件then门End if2、If条件then门1Else门2End if案例1:比较a与b的大小，并输出最大值。Private Sub Command1_Click()A=inputbox (a=)B=inputbox (b=)If a b thenPrint a=aElsePrint b=bEnd ifEnd Sub案例2:有些购物中心为了苹果的促销购买2公斤以上，以定价的每公斤1.5韩元为标准，打8%的折扣。设计计算xkg的苹果购买应付帐款的程序。Private Sub Command1_Click()x=input box(“x=”，“请输入苹果的重量”)If x2 thenY=1.5

10、*0.8*xElseY=1.5*xEnd if印刷“苹果的应付帐款”；y；“安慰”End Sub第五届会议方案的循环结构周期结构的格式1，for循环变量=初始值to结束值循环体Next循环变量2，do while (until)条件循环体回路或者Do循环体Loop while (until)条件案例1: 1 2 3.取得值100Private Sub Command1_Click()Dim I as integerDim s as integerS=0For i=1 to 100S=s I下一步IPrint s=sEnd Sub案例2:已知s=1 2 3.n，找到最大整数n之一，s30000。

11、写入程序解决了此问题Private Sub Command1_Click()N=0S=0Do while s30000N=n 1S=s n回路Print n-1End SubDO循环语句的四种形式比较条件判断放在循环语句的开头条件判断放在循环语句的末尾满足列出的条件时运行循环满足列出的条件时结束回路满足列出的条件时运行循环满足列出的条件时结束回路Do while条件循环体回路Do until条件循环体回路Do循环体Loop while条件Do循环体Loop until条件案例：如果判断大于2的自然数m是小数，并且是小数，那么“这是小数！”，否则输出“这不是小数！单击Private Sub Command1_Click()dim as integer，I as integerM=Inputbox(输入数字：)I=2Do until (M mod I=0) or (i=M-1)I=I 1回路If M mod I=o then打印m；“不是小