高中VB必考知识点汇总_第1页
高中VB必考知识点汇总_第2页
高中VB必考知识点汇总_第3页
高中VB必考知识点汇总_第4页
高中VB必考知识点汇总_第5页
已阅读5页,还剩10页未读 继续免费阅读

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

1、.实用文档.算法与程序设计VB知识点一、数据类型Integer整型Long长整型Single单精度实型Double双精度实型String字符型二、常量与变量1、常量的定义2、Const常量名 as 类型=表达式变量的定义Dim变量名as类型三、运算符1、算术运算符+ - * /A mod2、字符运算符& +3、关系运算符>,>=,<,<=,<>,=4、逻辑运算符And notor四、函数1、sin(x)2、cos(x)3、fix(x)4、int(x)5、sqr(x)6、abs(x)五、赋值语句格式:变量=表达式六、输入语句变量=inputbox( &

2、quot;; ”)七、输出语句Print 内容八、条件语句1、If 条件 then 语句2、If 条件 then语句1 else 语句2 或者:1、 If 条件 then语句End if2、If 条件 then语句1Else语句2End if九、循环语句1、 for循环变量=初值 to终值 循环体Next 循环变量2、 do while (until)条件循环体Loop或者do循环体Loop while (until)条件第一课时.实用文档.一、VB的简单介绍VB是visual basic的简称,是一种可视化的程序工具VB的界面介绍及相关控件和窗口的介绍:1、 控件工具箱标签、文本框、按钮控件

3、2、 设计窗口3、 属性窗口强调标签的caption、font属性,文本框的text属性,按钮的caption、font属性4、 代码窗口 h >-F B»I1 M4 T龙井叫 Un fiS'ID工H ZJ电小;I超中 遇廿四 fil 1J 卯 L UIIII外修理字£1 1H口m Raif押 1M - J,|四制事 丫1由I也一MH 1,3 ;也/'a,o/ 14 HPrivate Sub Command1_Click()Tl3方 Trniiwm* i三学(T a w产乜”由,皿TBC*U FUTQLi IHti /卖山ilU中茸件如1<1 j

4、>工活大IH'If外南聊引口中*Wi.lZ1Mn 期.川口 -3SIJ出皿l.i-.-rILH.gf alE|-M |,I Tau,ML-t司一 ”W 1BnhTTm*争4.iqjEtfM aL/彳 出工F程序的初步尝试编写1、设计界面口哽* * 却 /2、进入代码窗口,编写如下程序:Dim a,b,c as integer a= c=a*b text3.text=c或者 text3.text=text1.text*text2.textEnd Sub 3、运行程序单击“运行一一“启动4、对程序进行调试,查看运行结果5、思考:对程序进行修改,将“ * 修改为"-或者”厂后

5、运行程序。假设修 改为“+呢。.实用文档.第二课时1、 数据类型1、 integer 整型只能够表示-3276832767之间的整数。2、 long 长整型只能够表示-21474836482147483647之间的整数3、 single 单精度实型可以用来表示小数4、 string 字符型例如:zhongguo , 中国,123456案例1:求1 X2X 3Xx 10的值。Private Sub Command1_Click()Dim i As integerDim s as integers = 01 = 1For i = 1 To 10s = s * iNext iPrint sEnd S

6、ub案例2:求圆的面积Private Sub Command2_Click()Dim r As SingleDim s As Singler = InputBox("r=")s = pi * r * rPrint " 圆的面积s=" sEnd Sub2、 运算符1、 算术运算符八乘方、*、/、(整除)、mod幽余)、+、-2、 关系运算符>、 >=、 <、 <=、 =、 <>3、字符运算符6、 +4、逻辑运算符Not 、 and、 or案例:假设a=5,b=7,c=-2,d=1, 求以下式子的结果a+b>c+d

7、and a>=5 or not c>0 or d<03、 函数Sqr(x) x 的平方根Abs(x) x 的绝对值Int(x) 不大于x的最大整数int(-4.5) 结果是 -5int(4.5) 结果是 4Fix(x) 取整Fix(4.5) 结果是 4Fix(-4.5) 结果是 -4.实用文档.Cint(x)/clng(x)四舍五入取整四、表达式例题:a=1,b=3,c=2,求 x1= b 苗 4ac,x2= b 血2 4ac 的值。 2a2aX1=(-b+sqr(bA2-4*a*c)/(2*a)X2=(-b-sqr(bA2-4*a*c)/(2*a)Private Sub C

8、ommand1_Click()a = 1b = 3c = 2X1 = (-b + Sqr(b 八 2 - 4 * a * c) / (2 * a)X2 = (-b - Sqr(b 八 2 - 4 * a * c) / (2 * a)Print X1Print X2End Sub第三课时程序的顺序结构一、赋值语句赋值语句的根本格式:变量=表达式这里“二是赋值符号,它的含义是将表达式的值赋给左边的变量二、输入函数格式:inputbox提示信息,标题,默认值,位置 例如:.实用文档.Private Sub Command1_Click()A = InputBox("A=",&qu

9、ot;输入",12, 100, 20)End Sub三、输出函数格式:print 输出内容说明:1、如果输出的内容是数、变量、表达式,那么输出的是它们的值。如果是用引号引起来的字符串,那么原样输出。2、输出内容可以是一个或多个。如果是多个,那么输出内容之间可以用逗号或分号分隔;如果用分号,那么后面一个输出紧跟前一个输出;如果是逗号,那么按 照分区格式输出。3、如果输出内容后面没有符号,那么表示下一个PRINT换行输出;如果Print中没有输出内容,那么表示输出一个空行。案例1:书本第38页Private Sub Command1_Click()a = Val(InputBox(&qu

10、ot;a=","输入")b = Val(InputBox("b=","输入")Max = (a + b) / 2 + Abs(a - b) / 2Print "Max=" MaxEnd Sub案例:2:长方体的长宽高,求长方体的全面积和体积。Private Sub Command1_Click().实用文档.a = InputBox("a=")b = InputBox("b=")c = InputBox("c=")s = 2 * (a * b +

11、 a * c + b * c)v = a * b * cPrint " 全面积 S=" s, " 体积 v=" vEnd Sub第四课时程序的选择结构一、条件语句的格式1、 If条件then语句2、 If条件then 语句 1 else 语句 2或者:1、 If 条件 then语句End if2、 If 条件 then语句 1Else语句 2End if案例 1:比拟 a 和b 的大小,并输出最大的值。Private Sub Command1_Click()a=inputbox( “a= )b=inputbox( “ b= )if a> b the

12、nprint “a= ;aelseprint “b= ;bend ifEnd Sub案例2:某商场为了对苹果进行促销,规定购置2 千克以上可以在原价每千克1.5元的根底上打8折。请设计一个程序计算购置 x千克苹果的应付款。Private Sub Command1_Click()X=inputbox( “x= , 请输入苹果的重量)If x>2 thenY=1.5*0.8*xElseY=1.5*xEnd ifPrint “苹果的应付款为;y; 元End Sub.实用文档.第五课时程序的循环结构循环结构的格式1、 for 循环变量=初值to 终值循环体Next 循环变量2、 do while

13、 (until) 条件循环体Loop或者do循环体Loop while (until)条件案例1:求1+2+3+100的值Private Sub Command1_Click()Dim I as integerDim s as integerS=0For i=1 to 100S=s+iNext iPrint “s= ;sEnd Sub案例 2: s=1+2+3+Private Sub Command1_Click()n=0S=0Do while s<30000n=n+1S=s+nLoopPrint n-1End SubDO循环语句四种形式的比拟条件判断放在循环语句的开头局部条件判断放在循

14、环语句的结尾局部所列条件满足时执行循环所列条件满足时退出循环所列条件满足时执行循环所列条件满足时退出循环Do while 条件循环体LoopDo until条件循环体LoopDo循环体Loop while 条件Do循环体Loop until 条件案例:判断一个大于2的自然数M是否是素数,如果是素数,那么输出“这是个素数!,否那么输出“这不是一个素数!Private Sub Command1_Click()Dim M as integer, I as integerM=Inputbox( “输入一个数:)I=2Do until (M mod I=0) or (i=M-1)I=I+1LoopIf M mod I=o thenPrint M; 不是素数ElsePrint M; 是素数End ifEnd

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论