春VB复习资料答案64.docx
《春VB复习资料答案64.docx》由会员分享,可在线阅读,更多相关《春VB复习资料答案64.docx(13页珍藏版)》请在冰豆网上搜索。
![春VB复习资料答案64.docx](https://file1.bdocx.com/fileroot1/2023-2/24/1fea9cfc-05ff-449d-ac44-c1cffb5a5191/1fea9cfc-05ff-449d-ac44-c1cffb5a51911.gif)
春VB复习资料答案64
VB复习纲要
一、知识点:
第1章VisualBasic概述
1.Vb的主要特点:
面向对象、事件驱动、结构化设计语言等
2.窗体设计器窗口、属性窗口、工程资源管理器窗口等的作用
3.对象的概念,对象的三要素(属性、事件、方法)(P7)
4.Vb应用程序开发步骤(P8)
5.工程中包含的4类文件及它们的扩展名(P14)
第2章VB程序设计的基础
1.VB的常用数据类型(Integer、Long、Single、Double、String),类型名、类型符、占用的字节数。
2.常量和变量的含义,如何声明常量和变量(关键字分别为Const和Dim)
3.变量的命名规则。
4.三种变量:
局部变量、模块变量和全局变量的作用域。
5.vb中的函数(内部函数、字符处理和字符串函数)的用法和作用,主要需要掌握的函数有:
、Int()、Len()、RTrim()、Rnd()、Sqr()、Val()、Year(Now)、Exp()、LoadPicture()
6.算术运算符、关系运算符、逻辑运算符的作用,会计算表达式,运算符的优先级顺序,表达式的执行顺序。
7.数学表达式和vb表达式的相互转换
8.会计算已知表达式的值
第3章数据的输入与输出语句
1.Print方法的使用格式、功能及能使用print方法的四种对象(窗体、图片框、打印机、立即窗口)P32
2.与print方法相关的函数Tab()、Spc()、Space()、Format()P33-35
3.Cls方法的功能
4.InputBox函数的格式和功能
5.MsgBox函数和MsgBox语句的格式和功能
第4章程序设计语言
1.赋值语句的功能(变量赋值、控件属性赋值),赋值号和数学中的等号含义上的区别P43
2.单分支条件语句和双分支条件语句的格式和执行过程,块结构和单行结构格式的区别P44
3.IIF()函数的格式、功能及使用方法P45
4.多分支条件语句IF……Then……ElseIf语句和SelectCase的格式、功能、执行流程P46-47
5.For循环的格式、功能及执行流程P48
6.Do循环(DoWhile和DoUntil)的格式、功能和执行流程P49
7.理解各种循环执行过程,能根据题目条件选择合适的循环
8.会计算循环执行次数
9.End语句的功能
10.数组的概念、数组的表示、数组的默认下界、能根据给定的数组计算出数组中元素的个数P56
11.过程的概念和功能P72
12.函数的概念及功能P76
第5章窗体
1.对象的基本属性(Name、Caption、Width、Height、Left、Top、Visible、Enabled、Font、BlackStyle、ForeColor、PasswordChar、MaxLength)
2.对象属性的设置方法
3.窗体的基本属性、事件(load、Click、DblClick)和方法(Move、SetFocus)P87
第6章常见控件的使用
1.标签和文本框控件的功能、常用属性(文本框的Text属性)、事件和方法。
2.命令按钮的属性、事件和方法。
3.VB常用对象的属性(名称、Caption等)。
二、选择、判断题和填空题:
重点是书上的基本概念、例题、作业。
三、简答题
1.VB开发应用程序的一般步骤。
P8
2.对象的概念、对象的三要素是什么、列举几个常见对象名称。
P7
答:
对象是对具有某些特征的具体事物的抽象。
对象三要素:
属性、方法、事件
举例:
窗体、文本框、标签、命令按钮、图片框、图像框、计时器
3.列举说明VB6.0的IDE的窗口组成(至少5个)、功能。
P4-p6
4.简述inputbox函数和msgbox函数的功能
答:
inputbox函数:
产生一个对话框,这个对话框作为输入数据的界面,等待用户的输入数据,并返回所输入的内容。
msgbox函数:
在屏幕上显示一个消息对话框,根据选择确定其后的操作。
5.窗体的常用属性,至少列举5,并说明它们的功能。
P87
6.VB变量名的命令规则。
答:
1、第一个字符必须是汉字或字母
2、不能在名称中使用空格、句点等已有特殊含义的字符
3、不能超过255个字符
4、不能使用关键字做变量名
5、最后一个字符可以是类型说明符
7.简述for循环语句的语法格式及其功能,试分析For循环和Do循环执行特点的异同。
答:
for循环语句的语法格式及其功能P48
相同:
都是循环语句,可以重复执行一组操作
区别:
通常情况下,设计时,For循环能确定循环的次数,do循环不能确定循环的次数。
8.叙述文本框的功能,举出5个文本框常用的属性并说明。
P107
9.简述标签与文本框控件的异同点。
P103
10.谈谈你对计算机编程、编程步骤的理解。
请简要总结一下《VB程序设计》课程的学习,你对该课程内容的学习情况、期望达到的学习目标。
11.将数学表达式改成VB表达式
12.利用数组来存储一组数并找出这组数中的最小值。
Dima(5)AsInteger
a(0)=InputBox("aaa")
x=a(0)
Fori=1To5
a(i)=InputBox("aaa")
Ifa(i)x=a(i)
EndIf
Next
Printx
四、程序题
1.根据用户输入课程成绩,判断该门课程成绩是否合格。
X%=inputbox(“请输入课程成绩”)
Ifx>=60then
Print“合格”
Else
Print“不合格”
Endif
2.某交易中介公司按交易双方成交额收取中介费用,收费标准如下:
交易额>=500006%
30000=<交易额<500004%
10000=<交易额<300003%
5000=<交易额<100001%
交易额<5000免费
假设交易额通过文本框Text1输入,请编写“计算费用”按钮Command1的事件代码。
1、用if实现
PrivateSubCommand1_Click()
x&=Text1.Text
Ifx<5000Then
y=0
ElseIfx<10000Then
y=(x-5000)*0.01
ElseIfx<30000Then
y=(10000-5000)*0.01+(x-10000)*0.03
ElseIfx<50000Then
y=(10000-5000)*0.01+(30000-10000)*0.03+(x-30000)*0.04
Else
y=(10000-5000)*0.01+(30000-10000)*0.03+(50000-30000)*0.04+(x-50000)*0.06
EndIf
Print"中介费用",y
EndSub
2、用select实现
PrivateSubCommand1_Click()
x!
=Val(Text1.Text)
SelectCasex
CaseIs<5000
y=0
CaseIs<10000
y=(x-5000)*0.01
CaseIs<30000
y=5000*0.01+(x-10000)*0.03
CaseIs<50000
y=5000*0.01+20000*0.03+(x-30000)*0.04
CaseElse
y=5000*0.01+20000*0.03+20000*0.04+(x-50000)*0.06
EndSelect
Printy
EndSub
3.编写一段程序,实现在单击窗体时通过键盘接收一个百分制成绩,将其转换成“优”(90分以上)、“良”(80~89)、“中”(70~79)、“及格”(60~69)、“不及格”(59分以下),运行时,单击窗体显示转换结果。
PrivateSubForm_Click()
x%=InputBox("请输入一个分数")
Ifx>=90Then
y="优"
ElseIfx>=80Then
y="良"
ElseIfx>=70Then
y="中"
ElseIfx>=60Then
y="及格"
Else
y="不及格"
EndIf
Printy
EndSub
4.某快递公司运费标准为5kg以下货物运费10元,5kg以上货物,在基础运费10元的基础上每增加1公斤重量运费增加2元。
编程实现其运费计算。
x%=InputBox("请输入货物重量")
Ifx<=5Then
y=10
Else
y=10+(x-5)*2
EndIf
Print"货物运费",y
5.编程实现:
单击窗体时通过InputBox函数输入三个数,然后用Print方法输出3个数中最小的那个数。
PrivateSubForm_Click()
x%=InputBox("请输入第一个数")
y%=InputBox("请输入第二个数")
z%=InputBox("请输入第三个数")
m=x
Ifm>yThen
m=y
EndIf
Ifm>zThen
m=z
EndIf
Printm
EndSub
6.计算下面分段函数的值,并输出y的值。
y=
x!
=Val(InputBox("请输入第一个数"))
Ifx>0Then
y=x^2
Else
y=-3*x
EndIf
Printy
7.从键盘输入四个数,计算它们的平均值,并输出显示在窗体上。
X1!
=Val(InputBox("请输入第一个数"))
X2!
=Val(InputBox("请输入第二个数"))
x3!
=Val(InputBox("请输入第三个数"))
x4!
=Val(InputBox("请输入第四个数"))
avg1=(X1+X2+x3+x4)/4
Print"四个数的平均值是:
",avg1
8.写窗体的单击事件,分别用For循环、DoWhile…Loop及Do……LoopUntil循环分别计算1到100的奇数和。
将结果显示在窗体上。
PrivateSubForm_Click()
Sum=0
Fori=1To100Step2
Sum=Sum+i
Next
Print"1到100间奇数和:
",Sum
EndSub
PrivateSubForm_Click()
Sum=0
i=1
DoWhilei<=100
Sum=Sum+i
i=i+2
Loop
Print"1到100间奇数和:
",Sum
EndSub
PrivateSubForm_Click()
Sum=0
i=1
Do
Sum=Sum+i
i=i+2
LoopUntili>100
Print"1到100间奇数和:
",Sum
EndSub
9.编程序求S=1*2*3*……*50
答:
s=1
Fori=1to50
S=s*i
Next
Prints
10.通过键盘输入一个整数n,计算n!
n%=InputBox("请输入一个正整数")
s=1
Fori=1Ton
s=s*i
Next
Printn;"的阶乘是:
";s
11.输入3个数,计算三个数的和,并将计算结果显示在窗体上
X1!
=Val(InputBox("请输入第一个数"))
X2!
=Val(InputBox("请输入第二个数"))
x3!
=Val(InputBox("请输入第三个数"))
sum=x1+x2+x3
Print"三个数的和是:
",sum
12.使用循环语句求1……n间的偶数累加和。
n%=inputbox(“输入一个正整数”)
Sum=0
Fori=0TonStep2
Sum=Sum+i
Next
Print"1到n间偶数和:
",Sum
13.设计如下图所示计算圆面积和周长的程序,当输入半径后,单击计算按钮,显示出计算的面积和周长;单击退出按钮则退出程序。
PrivateSub计算_Click()
r!
=Val(半径.Text)
s=3.14*r^2
c=2*3.14*r
面积.Text=s
周长.Text=c
EndSub
PrivateSub退出_Click()
End
EndSub
14.程序的执行屏幕如图片1,文本框text1中输入的是被除数,文本框text2中输入的是除数,标签label1,命令按钮command1,编程实现当单击命令按钮时,如果除数为0弹出一个消息框(图片2),否则将计算结果显示在标签中。
图片1图片2
PrivateSubCommand1_Click()
X1!
=Val(Text1.Text)
X2!
=Val(Text2.Text)
IfX2=0Then
MsgBox"除数不能为0",48,"提示信息"
Else
Label1.Caption=X1/X2
EndIf
EndSub