《高中VB必考知识点汇总》由会员分享，可在线阅读，更多相关《高中VB必考知识点汇总（12页珍藏版）》请在金锄头文库上搜索。
1、算法与程序设计VB知识点一、数据类型Integer整型Long 长整型Single单精度实型Double双精度实型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(：”)七、输出语句Print内容八、条件语句1、If条件then语
2、句2、If条件then语句1else语句2或者：1、 If条件then语句Endif2、 If条件then语句1Else语句2Endif九、循环语句1、 for循环变量=初值to终值循环体Next循环变量2、 dowhile(until)条件循环体Loop或者do循环体Loopwhile(until)条件第一课时一、VB的简单介绍VB就是visualbasic的简称，就是一种可视化的程序工具VB的界面介绍及相关控件与窗口的介绍：1、 控件工具箱(标签、文本框、按钮控件)2、 设计窗口（强调标签的caption、font属性，文本框的text属性，按钮的caption、font属性）4、代码窗口
3、irflri mu 耐吧 工if川 嗒七口wn 疗ma XiiTi el lrui品出M剧 口,1 皿【】 剑 r - 1工u /出- -力|敢ef的二寿|七台簿件8 Mu 1VT1XI ira-H e*；G Rii| CTll 登E kL Ulil 外雷I!不可口皿I2U程序的初步尝试编写.1 * . h1“ 射，施上中. - -7*-1 * a Z ,*e 0 ? ie n2、进入代码窗口，编写如下程序:PrivateSubCommand1_Click()Dima,b,casintegera=text1、textb=text2、textc=a*btext3、text=c或者text3、te
4、xt=text1、text*text2、textEndSub3、运行程序单击“运行”一一“启动”4、对程序进行调试，查瞧运行结果5、思考：对程序进行修改，将“*”修改为“-”或者“/”后运行程序。若修改为“+”呢。第二课时一、 数据类型1、integer整型只能够表示-3276832767之间的整数。2、long长整型只能够表示-21474836482147483647之间的整数3、single单精度实型可以用来表示小数4、string字符型例如：zhongguo，中国“，123456”案例1:求1X2X3Xx10的值。PrivateSubCommand1_Click()DimiAsinteg
5、erDimsasintegerFori=1To10NextiPrintsEndSub案例2:求圆的面积PrivateSubCommand2_Click（）ConstpiAsSingle=3、14DimrAsSingleDimsAsSingler=InputBox（r=）s=pi*r*rPrint圆的面积s=;sEndSub二、 运算符1、 算术运算符A（乘方）、*、/、（整除）、mod幽余）、+、-2、 关系运算符、=、=、=、3、字符运算符&、+4、逻辑运算符Not、and、or案例:若a=5,b=7,c=-2,d=1,求下列式子的结果a+bc+danda=5ornotc0ordbthenp
6、rint“a=”;aelseprint“b=”;bendifEndSub案例2:某商场为了对苹果进行促销,规定购买2千克以上可以在原价每千克1、5元的基础上打8折。请设计一个程序计算购买x千克苹果的应付款。PrivateSubCommand1_Click()X=inputbox(“x=”,”请输入苹果的重量”)Ifx2thenY=1、5*0、8*xElseY=1、5*xEndifPrint“苹果的应付款为”;y;”元”EndSub第五课时程序的循环结构循环结构的格式1、 for循环变量=初值to终值循环体Next循环变量2、 dowhile(until)条件循环体Loop或者do循环体Loop
7、while(until)条件案例1:求1+2+3+100的值PrivateSubCommand1_Click()DimIasintegerDimsasintegerS=0Fori=1to100S=s+iNextiPrintS=”;sEndSub案例2:已知s=1+2+3+n,找出一个最大的整数n,使得s30000、编写程序解决这个问题PrivateSubCommand1_Click()n=0S=0Dowhiles30000n=n+1S=s+nLoopPrintn-1EndSubDO循环语句四种形式的比较条件判断放在循环语句的开头部分条件判断放在循环语句的结尾部分所列条件满足时执行循环所列条件满
8、足时退出循环所列条件满足时执行循环所列条件满足时退出循环Dowhile条件循环体Dountil条件循环体Do循环体Do循环体LoopLoopLoopwhile条件Loopuntil条件案例：判断一个大于2的自然数M就是否就是素数，如果就是素数，则输出“这就是一个素数！，否则输出“这不就是一个素数！”PrivateSubCommand1_Click()DimMasinteger,IasintegerM=Inputbox(输入一个数：”)I=2Dountil(MmodI=0)or(i=M-1)I=I+1LoopIfMmodI=othenPrintM;不就是素数”ElsePrintM;就是素数”EndifEndsub循环的嵌套PrivateSubCommand1_Click()DimseAsStringPrintTab(35);乘法表”ForI=1To9Forj=1To9se=I&乂&j&=&I*jPrintTab(j-1)*9);se;NextjNextIEndSub
