编程.docx
- 文档编号:14797001
- 上传时间:2023-06-27
- 格式:DOCX
- 页数:21
- 大小:59.33KB
编程.docx
《编程.docx》由会员分享,可在线阅读,更多相关《编程.docx(21页珍藏版)》请在冰点文库上搜索。
编程
编程
第一部分:
基础知识
1.什么是算法?
对解决问题过程的精确描述就是算法(注:
不一定是计算机语言描述)
2.什么是程序设计?
将解决问题的方法和步骤,编写成计算机可以执行的程序,这一过程就是程序设计
(即算法的计算机化)
3.什么是程序?
程序,即让计算机完成任务的一系列指令。
4.程序设计的分类?
机器语言、汇编语言、高级语言
5.常见的高级语言?
BASIC、C、C++、C#、Java、PASCAL
6.常用的流程图符号?
7.VB的特点:
面向对象、事件驱动、可视化的高级语言
8.VB的基本概念:
对象:
窗体和控件的统称如:
Form、Label、TextBox等
属性:
对象所具有的性质如:
Label1.CaptionText1.text格式:
对象名.属性名
事件:
对象被动执行的操作如:
Command1_Click()Form_Load()格式:
对象名_事件名()
方法:
对象被动执行的操作如:
Form1.Cls格式:
对象名.方法名
9.常见控件
(1)窗体属性:
Name(名称,缺省为Form1)、Caption(标题)
事件:
加载事件Form_Load()、单击事件Form_Click()
(2)标签属性:
Name(名称,缺省为Label1)、Caption(标题)
事件:
单击事件Label1_Click()
(3)按钮属性:
Name(名称,缺省为Command1)、Caption(标题)
事件:
单击事件Command1_Click()
(4)文本框属性:
Name(名称,缺省为Text1)、Text(文本框的内容)
事件:
单击事件Text1_Change()
10.Vb程序设计的步骤:
v分析需求和设计算法
v设计用户界面,为对象设置属性
v编写程序代码
v调试、运行程序
v保存工程
11.基本数据类型
整型
Integer
长整型
Long
单精度实数
Single
双精度实数
Double
字符串型
String
逻辑类型
Boolean
12.什么是常量、变量?
其值可以改变的空间称为变量
其值不可改变的空间称为常量
13.常见运算符:
v算术运算+(加法)-(减法)*(乘法)/(除法)\(整除)Mod(求余)^(幂方)
v连接运算&(先转换为字符型,再作连接运算)
v关系运算><=>=<=<>
v逻辑运算Not(逻辑非)And(逻辑与)Or(逻辑或)
v赋值运算=(a=bb的值赋给a)
14.内部函数
Val(x)将字符串转换为相应的数值
Abs(x)返回x的绝对值
Sqr(x)返回x的算术平方根
Int(x)返回不大于x的最大整数
15.Print方法
Print“x”打印字符x,并换行
Print“x”;打印字符x,不换行
Print“x=“;1+3打印x=4,换行
Print换行
PrintTab
(2);光标放在第2列,不换行
16.注释
使用Rem或者‘
第二部分:
程序结构和典型程序
1.顺序结构(略)
2.分支结构
注意:
当语句块只有一句时,可以把它写在then后面,并省略EndIf,如以下等价:
Ifa>0then
a=1
EndIf
和
Ifa>0thena=1
3.循环结构
典型程序(界面设计略)
v输入一公元年号,判断是否为闰年
v求解Ax2+Bx+C=0(假设A<>0B<>0)
v输入3个数,输出最小的数
v利用循环实现累加求解:
s=1+3+5…+99
v利用循环实现累乘求解:
10!
v输入一个数,判断是否为质数
v打印n层直角三角形
v打印n层等腰三角形
一、单择题
1、在VB程序设计语言中,_____语句的功能是使系统产生的随机数种子真正随机化。
A:
RndB:
CircleC:
RandomizeD:
Dim
注释:
CRnd产生随机数的函数,其实产生之前要用Randomize产生随机数种子
2、下列程序运行后,变量x=______。
PrivateSubForm_click()
Dimi,n,xAsInteger
n=5
x=1
Fori=1Ton
x=x*i
Nexti
EndSub
A:
5B:
15C:
24D:
120
注释:
D从上向下一句句运行实际计算5的阶乘
3、下列程序运行后,变量k=______。
DimkAsInteger
PrivateSubCommand1_Click()
k=0
Fori=7To100Step7
K=k*i
Nexti
EndSub
A:
0B:
7C:
14D:
15
注释:
A累乘,但初值为0
4、在VB中,改变控件的位置,___的值在改变。
A:
Height与WidthB:
Height与LeftC:
Left与TopD:
Top与Width
注释:
CHeight与Width代表高度和宽度
5、在VB中__选项不是一个对象的属性。
A:
名字B:
大小C:
打印D:
颜色
注释:
C打印是方法
6、在VB中,建立一个文本编辑区域,可采用下列中的___。
A:
命令按钮B:
标签控件C:
文本框控件D:
定时器控件
注释:
C
7、在VB应用程序中,修改控制代码,使Command1按钮显示"Yes",正确的设置是___。
A:
Command1.Text="Yes"B:
Command1.Caption="Yes"
C:
Command1.Name=YesD:
Command1.Caption=Yes
注释:
B
8、在VB中,s="ABCDEFGHIJK",函数mid(s,3,4)的值是__。
A:
cdB:
cC:
CDEFD:
d
注释:
C取s中从第3个开始的连续4个字符
9、在VB中,用鼠标单击命令按钮时,将执行以下__事件的代码。
A:
KeydownB:
KeypressC:
ClickD:
Dblclick
注释:
CD是双击
10、在VB中,执行DimAAsSingle:
DimXAsString语句后,下述正确的是___。
A:
A和X都是数值型变量B:
A和X都是字符串型变量
C:
A是单精度型变量,X是字符串型变量D:
A是字符串变量,X是单精度型变量
注释:
C
11、在VB应用程序中,要隐藏窗体Form1,调用格式为___。
A:
Form1.ShowB:
Form1.HideC:
Hide.Form1D:
Show.Form
注释:
B
12、在VB中,判断变量X为偶数可以表示为___。
A:
INT(X/2)=X/2B:
INT(SQR(X/2))=X/2C:
ABS(X/2)=INT(X/2)D:
SQR(X/2)=X/2
注释:
A还可以是XMod2=0、X\2=X/2
13、在VB中,唯一能区别一个控件的属性是___。
A:
CaptionB:
ColorC:
NameD:
Index
注释:
C
14、在VB程序中,如果对象的名称为objname,而且对象有一个属性p,那么在代码中正确的引用该属性的格式是___。
A:
objname.pB:
p.objnameC:
objname(p)D:
objname*p
注释:
A
15、一元二次方程有两个根,在VB中,其中一个根的表达式写法为___。
A:
-B+SQR(B*B-4*A*C)/2*AB:
-B+SQR(B*B-4*A*C)/2/A
C:
(-B+SQR(B*B-4*A*C))/2*AD:
(-B+SQR(B*B-4*A*C))/2/A
注释:
D注意优先级
16、在VB中,如果要改变窗体的标题,需要设置窗体对象的___属性。
A:
NameB:
BackColorC:
CaptionD:
BorderStyle
注释:
C
17、在VB中,算法的三种基本结构是__。
A:
顺序结构、分支结构、循环结构B:
顺序结构、流程结构、循环结构
C:
顺序结构、分支结构、流程结构D:
流程结构、分支结构、循环结构
注释:
A
18、在VB中,流程图的判断框有1个入口___个出口。
A:
1B:
2C:
3D:
4
注释:
B
19、以下变量名中,___是不符合VisualBasic的命名规范的。
A:
Abc901B:
_mnu_Open_234C:
a_1D:
k
注释:
B由字母、数字和下划线组成,且第一个为字母
20、在VB中,下面流程图为输入A,B后,输出较大者,菱形中应填入___关系式。
A:
A>BB:
A<=BC:
A>=BD:
B=A
注释:
B注意FT标志
21、在VB中,下面关于算法的错误说法是___B。
A:
算法必须有输出B:
算法必须在计算机上用某种语言实现
C:
算法不一定有从键盘输入D:
算法必须在有限步执行后能结束
注释:
B看算法概念
22、在VB中,判断变量k大于或等于60并且小于70的条件表达式是___。
A:
k>=60和k<70B:
60<=k<70C:
k>=60ORk<70D:
k>=60ANDk<70
注释:
D要用逻辑运算符And并且
23、算法是解决问题的______。
A:
程序代码B:
方法与步骤C:
计算公式D:
最终结果
注释:
B看算法概念
24、VisualBasic中以单引号开头一行文字称为注释,它对程序的运行_______。
A:
起一定作用B:
有时候起作用
C:
不起任何作用,但是必须的D:
不起任何作用,但能增加程序的可阅读性
注释:
D注释作用
25、若要在一行书写多条语句,则各语句间的分隔符采用______。
A:
;B:
:
C:
+D:
|
注释:
B可看10题
26、要使用户单击窗体Form1时,Form1的颜色才变为绿色,代码窗口中应有如______的事件过程。
A:
PrivateSubForm1_Click()
Form1.ForeColor="绿色"
EndSub
B:
PrivateSubForm_Click()
Form1.BackColor=vbGreen
EndSub
C:
PrivateSubcommand1_Click()
Form1.forecolor=vbGreen
EndSub
D:
PrivateSubForm_Load()
Form1.BackColor="绿色"
EndSub
注释:
B
27、表达式3X-5(2COSX+Y)^2写成VisualBasic表达式正确的是_____。
A:
3*X-5(2*COS(X)+Y)^2B:
3X-5*(2*COS(X)+Y)^2
C:
3*X-5*(2COSX+Y)^2D:
3*X-5*(2*COS(X)+Y)^2
注释:
D
28、下面程序的执行后,A和B分别是______。
PrivateSubForm_click()
DimA,B,MAsInteger
A=1:
B=15
FORM=1TO10
A=A+1:
B=0
NEXTM
PRINTA;B
EndSub
A:
1,0B:
11,0C:
10,0D:
11,15
注释:
B
29、下面程序的执行后,输出结果是_______。
PrivateSubForm_click()
DimE,F,GAsInteger
E=3:
F=4:
G=5
E=F:
F=G:
G=E
PRINTE;F;G
Endsub
A:
345B:
453C:
454D:
455
注释:
C注意E的变化
30、在窗体上画一个名称为Command1的命令按钮,一个名称为Label1的标签,然后编写如下事件过程:
PrivateSubCommand1_Click()
s=0
Fori=1To15
x=2*i-1
IfxMod3=0Thens=s+1
Nexti
Label1.Caption=s
EndSub
程序运行后,单击命令按钮,则标签中显示的内容是_________
A:
1B:
5C:
27D:
45
注释:
B循环几次找出规律
二、操作题
1、打开考生文件夹下的工程文件ex1.vbp,单击Command1按钮,修改其中的程序,使其能输出如下图形。
操作完后以原文件名保存在考生文件夹下。
(注明:
运行时,把红色下划线删除)
PrivateSubCommand1_Click()
DimI,jAsInteger
ForI=1To__6____
Forj=1To__I____
Print____j;__
Nextj
NextI
EndSub
2、打开考生文件夹中的工程文件ex12.vbp,完善程序。
某航空公司客户行李管理规定:
客户行李20千克及其以下,运费0.5元/千克;20千克以上,不足50千克的运费0.8元/千克;50千克及其以上运费为1元/千克,利用文本框Text1输入行李重量,单击"计算"按钮时,将计算出的客户应付金额结果在文本框text2内显示出来。
最后按原文件名保存在考生文件下。
(注明:
运行时,把红色下划线删除)
PrivateSubcommand1_Click()
X=Val(Text1.Text)
If___x<=20_then__'第一空
Y=X*0.5
Else
__if_x<50_then__'第二空
Y=X*0.8
Else
Y=X*1
EndIf
EndIf
___PrintY___'第三空
EndSub
3、打开考生文件夹中的工程文件ex2.vbp,完善程序。
在VB提供的窗体Form1中,有两个文本框Text1、Text2,单击窗口时,将这两个文本框的值进行交换,并将结果打印在此窗体上。
操作完后以原文件名保存在考生文件夹下。
(注明:
运行时,把红色下划线删除)
PrivateSubForm_Click()
DimA,B,CAsInteger
A=Val(Text1.Text)
B=Val(Text2.Text)
___C=A___
A=B
___B=C___
PrintA,B
Text1.Text=A
Text2.Text=B
EndSub
4、打开考生目录下的工程文件vb20.vbp,单击Command1按钮,修改其中的程序,使其能输出如下图形。
*
**
***
****
*****
******
操作完后以原文件名保存在考生文件夹下。
(注明:
运行时,把红色下划线删除)
PrivateSubCommand1_Click()
Fori=1to_____6____
ForJ=1to______i___
Print___”*”_;___
NextJ
Nexti
EndSub
5、打开考生文件夹中的工程文件ex6.vbp,完善程序。
随机产生10个大于等于0且小于100的整数,统计其中有多少个大于等于60的数,并打印在窗体上。
操作完后以原文件名保存在考生文件夹下。
(注明:
运行时,把红色下划线删除)
PrivateSubForm_Click()
n=0
RandomizeTimer
Fori=1To10
x=___Int(Rnd*100)__
Ifx>=60Then___n=n+1__
Nexti
Print___n__
EndSub
6、打开考生文件夹下的工程文件ex7.vbp,完善程序。
在文本框text1中输入n的值,单击Command1按钮,求1*2*3*...*n的值,并在窗体上打印出来。
操作完后以原文件名保存在考生文件夹下。
(注明:
运行时,把红色下划线删除)
PrivateSubCommand1_Click()
Dimn,kAsSingle
n=Val(Text1.Text)
k=___1__
Fori=1To___n__
k=___k*i__
Nexti
Printn;"!
=";k
EndSub
7、打开考生文件夹中的工程文件ex8.vbp,完善程序。
编一段程序,由TEXT1输入X的值,求
┎1X>0
Y=│0X=0
┖-1X<0
操作完后以原文件名保存在考生文件夹下。
(注明:
运行时,把红色下划线删除)
PrivateSubForm_Click()
Dimx,yAsInteger
x=Val(Text1.Text)
Ifx=0Then
___y=0___
Else
Ifx<0Then
__y=-1____
Else
___y=1___
EndIf
EndIf
Print___y___
EndSub
8、打开考生文件夹中的工程文件ex11.vbp,程序中有三处错误,调试更正。
程序是求100以内偶数和S的值(s=2+4+6…+100)。
操作完后以原文件名保存在考生文件夹下。
PrivateSubForm_Click()
DimSAsInteger
DimIAsInteger
ForI=1To100Step1
S=S*I
NextI
PrintS
EndSub
9、打开考生文件夹下的工程文件ex13.vbp,完善程序。
目前世界人口为60亿,如果以每年1.4%的速度增长,多少年后世界人口达到或超过70亿。
操作完后以原文件名保存在考生文件夹下。
(注明:
运行时,把红色下划线删除)
PrivateSubForm_Click()
DimpAsDouble
DimrAsSingle
DimnAsInteger
p=6000000000
r=0.014
n=0
DoWhile___p<7000000000__
p=___p*1.014___
n=__n+1____
Loop
Printn;"年后";"世界人口达";p
EndSub
10、打开考生文件夹中的工程文件ex14.vbp,完善程序。
利用文本框Text1、Text2、Text3分别输入三个数,再单击Command1时,求出最小值并将结果打印在窗体上。
操作完后以原文件名保存在考生文件夹下。
(注明:
运行时,把红色下划线删除)
PrivateSubCommand1_Click()
DimaAsDouble
DimbAsDouble
DimcAsDouble
DimminAsDouble
a=Val(Text1.Text)
b=Val(Text2.Text)
c=Val(Text3.Text)
If___a min=a Else min=b EndIf Ifc min=___c___ EndIf Print_min___ EndSub 11、打开考生文件夹中的工程文件ex.vbp,完善程序。 求10以内奇数积S的值(s=1*3*5…*9)。 操作完后以原文件名保存在考生文件夹下。 (注明: 运行时,把红色下划线删除) PrivateSubForm_Click() DimSAsInteger DimIAsInteger __s=1____ fori=__1_to__9__step__2_ S=S*I NextI PrintS EndSub
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 编程