VB期末模拟试题2文档格式.docx
《VB期末模拟试题2文档格式.docx》由会员分享,可在线阅读,更多相关《VB期末模拟试题2文档格式.docx(11页珍藏版)》请在冰豆网上搜索。
8、大部分控件都没有的属性是_______。
A)TopB)NameC)VisibleD)Interval
9、在代码中定义了一个子过程:
SubP(a,b)
…
EndSub
下面_______调用该过程的格式是正确的。
A)CallPB)CallP10,20C)CallP(10,20)D)P(10,20)
10、将一个窗体设置为MDI子窗体的方法是________。
A)将窗体的名称改为MDIB)将窗体的MDIChild属性设为True
C)将窗体的MDIChild属性设为FalseD)将窗体的Enabled属性设为False
11、在程序运行期间,如果拖动滚动条上的滚动框,则触发的滚动条事件是______。
A)MoveB)ChangeC)ScrollD)GetFocus
12、表达式4+5\6*7/8Mod9的值是______。
A)4B)5C)6D)7
13、在VisualBasic中,下列____是合法的变量名。
A)RemB)2ndC)LoapD)Sum
14、对象的三个要素是:
____。
A)属性、方法、事件B)色彩、高度、宽度
C)事件、属性、色彩D)属性、高度、宽度
15、窗体模块文件的扩展名是:
A)frmB)basC)vbpD)txt
16、VisualBasic逻辑运算符Xor、0r、Not、And中,级别最高的运算符是______。
A)XorB)OrC)NotD)And
17、InputBox函数返回值的类型为_______。
A)数值B)字符串C)变体D)数值或字符串(视输入的数据而定)
18、为了把焦点移到某个指定的控件,所使用的方法是_______。
A)SetFocusB)VisibleC)RefreshD)GetFocus
19、设a=6,则执行x=IIF(a>
5,-1,0)后,x的值为_______。
A)5B)6C)0D)-1
20、以下对变量名的说法中,不正确的是_______。
A)不能以数字开头B)不能是VisualBasic的保留字
C)可以包含字母、数字、下划线和标点符号D)不能超过255个字符
21、以下关于多重窗体程序的叙述中,错误的是_______。
A)用Hide方法不但可以隐藏窗体,而且能清除内存中的窗体
B)在多重窗体程序中,各窗体的菜单是彼此独立的
C)在多重窗体程序中,可以根据需要指定启动窗体
D)对于多重窗体程序,需要单独保存每个窗体
22、在VisualBasic中,设置控件的大小,可改变下列____属性。
A)Height与WidthB)Height与TopC)Left与TopD)Left与Width
23、VisualBasic根据计算机访问文件的方式将文件分成三类,其中不包括_______。
A)顺序文件B)Unix文件C)二进制文件D)随机文件
24、符号%是声明_______类型变量的类型定义符。
A)IntegerB)VariantC)SingleD)String
25、用Dim(1,1to3)声明的是一个_______维数组。
A)1B)2C)3D)4
26、计算机操作系统的作用是________。
A)管理计算机系统的全部软、硬件资源,合理组织计算机工作流程,以达到充分发挥计算机资源的效率,为用户提供使用计算机的友好界面
B)对用户存储的文件进行管理,方便用户
C)执行用户键入的各类命令
D)为汉字操作系统提供运行基础
27、计算机的硬件主要包括:
中央处理器(CPU)、存储器、输出设备和_________。
A)键盘B)鼠标C)输入设备D)显示器
28、下列个组设备中,完全属于外部设备的一组是________。
A)内存储器、磁盘和打印机B)CPU、软盘驱动器和RAM
C)CPU、显示器和键盘D)硬盘、软盘驱动器、键盘
29、计算机存储器中,组成一个字节的二进制位数是________。
A)4B)8C)16D)32
30、微型计算机硬件系统中最核心的部件是________。
A)硬盘B)I/O设备C)内存储器D)CPU
二、填空题(共50分,每空2分)
I阅读程序,写出下列程序的运行结果:
1、下列VisualBasic程序段运行后,变量M的值为__1__。
a=2:
b=1:
c=5
Ifa<
bThenm=aElsem=b
Ifc<
mThenm=c
2、在窗体上画一个文本框,然后编写如下事件过程:
PrivateSubTextl_KeyPress(KeyAsciiAsInteger)
DimcharAsString
char=Chr(KeyAscii)
KeyAscii=Asc(UCase(char))
Textl.Text=String(6,KeyAscii)
程序运行后,如果在键盘上输入字母“a”,则文本框中显示的内容为___AAAAAAA____。
3、在窗体上画一个命令按钮,然后编写如下事件过程:
PrivateSubCommand1_Click()
x=0
DoUntilx=-l
a=InputBox("请输入A的值")
a=Val(A)
b=InputBox("请输入B的值")
b=Val(B)
x=InputBox("请输入x的值")
x=Val(x)
a=a+b+x
Loop
Printa
程序运行后,单击命令按钮,依次在输入对话框中输入5、4、3、2、1、-l,则输出结果为___2____。
4、在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
StaticxAsInteger
Cls
Fori=1TO2
y=y+x
x=x+2
Next
Printx,y
程序运行后,连续三次单击Command1按钮后,窗体上显示的是___1218____。
5、执行下列语句后整型变量a的值是___30_____。
If(3-2)>
2Then
a=10
ElseIf(10/2)=6Then
a=20
Else
a=30
EndIf
II在下列程序的划线处填写适当代码,使之能够完成题目要求:
6、完善程序,自定义一个名为JieC的函数,利用递归定义N!
=n*(n-1)!
求n的阶乘。
Public___Function________JieC(__n__%)AsDouble
Ifn=0Then
JieC=1
Else
JieC=JieC(n-1)
EndIf
_ENDFunction
7、完善程序,统计文本框中大小写字母各有多少个。
s=Text1.Text
Fori=1To_Len(s)___
c=_Mid(s,i,1)_
Ifc>
="
A"
And_c<
="
Z"
Then
t=t+1
m=m+1
NEXTi_
Print"
大写字符有"
&
t&
"
个"
;
小写字符有"
m&
8、完善程序,完成选择排序。
程序可随机生成指定个数的[10,99]区间的整数进行排序,在窗体中显示每一步排序操作的结果。
Dimia()AsInteger,i%,j%,imin%,t%,n%
n=Val(InputBox("
请输入数组元素的个数:
"
))
ReDimia(n)asinteger
Form1.Cls
Fori=1Ton
ia(i)=_int(rnd*90)+10
Printia(i);
Nexti
Fori=1To_____n-1______
imin=i
Forj=i+1Ton
Ifia(imin)>
ia(j)Thenimin=j
Nextj
t=ia(i)
ia(i)=ia(imin)
ia(imin)=t_
Print
Forj=1Ton
Printia(j);
Print
9、完善程序,输入x,求:
Sin(x)=x/1-x^3/3!
+x^5/5!
-x^7/7!
+``````+(-1)^n-1*x^2n-1/(2n-1)!
要求当第N项的精度小于10^-5时结束运算,自变量x单位为弧度。
提示:
t当前项=-1*t前一项*x^2/((i-1)*i)
Dimx!
DimSx!
Dimi%,t!
x=Val(InputBox("
x="
i=1
t=x/1
DoUntil__t__<
10^(-5)
Sx=Sx+t
i=i+2
t=-1___^(i-1)*__x^2/((i-1)*i)
_loop__
MsgBox"
计算结果Sin("
x&
)="
Sx&
vbCrLf&
验证Sin("
Sin(x)
10、完善程序,在窗体中绘制y=Sin(x)函数图形。
要求鼠标单击窗体时开始绘制,绘制范围:
-3.1415926<
=x<
=3.1415926
y!
PrivateSub__Form_Clik()_____
_________X=-3.1415926________
Timer1.Interval=10