高中信息技术习题vb部分Word文档下载推荐.docx
《高中信息技术习题vb部分Word文档下载推荐.docx》由会员分享，可在线阅读，更多相关《高中信息技术习题vb部分Word文档下载推荐.docx（9页珍藏版）》请在冰豆网上搜索。
B．500
C．50
D．5
7．下列控件中可设置滚动条是
A.计时器
B．标签
C．文本框
D．按钮
8．下面程序执行的结果是
Private
Sub
Form_Click（）
A
=
"
123"
:
B
456"
C
Val（A）
+
Val（B）
〖val是把字符转化为数值的函数〗
Print
\
100
End
Sub
A.123
B.3
C.5
D.579
9．下列逻辑运算结果为"
true"
的是
A.flase
or
not
true
B.flase
and
true
D.true
10．下列控件中可用于接受用户输入文本，又可用于显示文本的是
A．Label
控件
TextBox
控件
Timer
CommandButton
11.以下程序段执行后，整型变量n
的值为
year=2001
n=year\4+year\400-year\100
495
505
500
485
12.下列关于CommandButton
控件的叙述正确的是
控件的Caption
属性决定按钮上显示的内容
单击VB应用程序中的按钮，则系统激活按钮控件对应的Change
事件
控件的name
以上都不对
13.以下程序段执行后整型变量n
n=0
for
i=1
to
20
step
5
n=n+i
next
i
50
34
15
210
14.如果要改变窗体的标题,需要设置窗体对象的属性。
C.BackColor
D.BorderStyle
15.窗体的BackColor属性用于设置窗体的
A.高度
B.宽度
C.背景色
D.前景色
16.
Visual
Basic提供的标签控件（LABEL）可具有功能是
A.输入文本
B.显示文本
C.计时
D.显示时间
17.
Basic规定窗体文件的扩展名是
.for
.frm
.vbp
.bas
18．下列关于算法的叙述不正确的是
A．算法是解决问题的有序步骤
B．算法具有确定性、可行性、有限性等基本特征
C．一个问题的算法都只有一种
D．常见的算法描述方法有自然语言、图示法、伪代码法等
19．
下列关于添加"
控件"
的方法正确的是
A．单击控件图标，将指针移到窗体上，双击鼠标
B．双击工具箱中的控件，即在窗体上出现该控件
C．单击工具箱中的控件，将指针移到窗体上，再单击
D．用鼠标左键拖动工具箱中的某控件到窗体的适当位置
20．以下选项中，不是
Basic控件的是
A.文本框
B.定时器
C.窗体
D.命令按钮
21．双击窗体中的对象后，Visual
Basic将显示的窗口是
A.项目（工程）窗口
B．工具箱
C．代码窗口
D．属性窗口
22．若整型变量a的值为2、b的值为3，则下列程序段执行后整型变量c的值为
if
a>
5
then
b<
then
c=a-b
else
c=b-a
else
b>
c=a*b
c=a
b
end
if
A．2
B.-1
C.1
D.6
23．下列逻辑表达式中能完全正确表示条件
year是闰年"
year
4=0
400=0
（year
400=0）
4=0）
100<
>
0）
24.
若要设置定时器控件的定时时间，需设置的属性是
A．Interval
B．value
C．Enabled
D．Text
25.下列关于For
...next
语句的说法正确的是
A.循环变量、初值、终值和步长都必须为数值型
B.step后的步长只能为正数
C.初值必须小于终值
D.初值必须大于终值
26.
下列程序执行后，整型变量n的值为
I=1
I
n=n+1
I
A.5050
B.25
C.26
D.33
27．若要设置文本框中所显示的文本颜色，使用的属性是
A.BackColor
B.FillColor
C.ForeColor
D.BackStyle
28．Visual
Basic程序设计的完整的步骤是
可视性程序设计
B．代码程序设计
C．可视性程序设计和代码程序设计
D．界面设计
29．在
Basic环境下，当写一个新的
Basic程序时，所做的第一件事是
A.编写代码
B．新建一个工程
C．打开属性窗口
D．进入VB环境
30．Visual
Basic是一种面向对象的程序设计语言，构成对象的三要素是
A．属性、事件、方法
B．控件、属性、事件
C．窗体、控件、过程
D．
窗体、控件、模块
31．只能用来显示字符信息的控件是
A.文本框
B.标签框
C.图片框
D.图像框
32．能够改变复选框中背景颜色的属性是
A．value
B．Fontcolor
C．Backcolor
D．Font
33.系统日期的函数是
data$
time$
date$
gettime$
34.设计一个计算器时，必须要使用的控件是
滚动条
B．图片框
C．文本框
D．单选框
35.
Basic规定工程文件的扩展名是
36．下列关于事件的叙述中不正确的是
A．事件是系统预先为对象定义的能被对象认别的动作
B．事件可分为用户事件与系统事件两类
C．VB为每个对象设置好各种事件，并定义好事件过程的过程名，但过程代码必须由用户自行编写
D．VB中所有对象的默认事件都是Click
37．下列各组变量声明正确的是
A．Dim
abc
as
integer
num
single
B．Dim
I%,
N$
integer
C．Dim
a%,
b%,
c%,
a$
D．public
dim
n%
〖变量名的默认类型：
%为整型、$为字符型、!
为单精型、#为双精型〗
38．下列各赋值语句，语法不正确的是
A．
x+y=5
B．
BiNumber
=15
C．
Labell.caption
=time
sLength
=x+y
39．如果x=4，那么以下运算结果为True的表达式是
A．（x<
=4）and（x>
=6）
B．（x>
=4）Or（x>
=6）
C．（x>
=4）Xor（x>
D．not（x<
4）
40．如果想在程序中反复使用一个数据“01/01/2000”，为了避免在编写程序时反复输入这个数据，也为了一次能够修改程序中所有用到这个数据的语句，可以采用
A．将这个数据声明为字符串型常量，用一个常量标识符代表它。
B．将这个数据声明为字符串型变量，用一个变量标识符表示它。
C．将这个数据声明为日期型常量，用一个常量标识符代表它。
D．将这个数据声明为日期型变量，用一个变量标识符表示它。
二．填空题
41．有如下程序段：
x＝5
y=6
x=y
y=x
printy
该程序段运行后，y的值为____（逐句分析变量值的变化）
42．有如下程序段：
x=5
y=－20
ifNotx>
0then
x＝y－3
y＝x+3
endif
该程序段运行后，x的值为____
43．有如下程序段：
e＝0：
f＝1
Fori=1to3
e=e+f
f=f+e
Nexti
该程序段运行后，f的值为_____________
44．将数学表达式
（x的单位：
弧度）写成相应的VisualBasic表达式后为
45．在计算器中编写"
相乘"
按钮的Click事件过程中，具体代码如下，请填空：
（1）将两个输入文本框中的数据转换成double型数，并分别赋值给num1,num2;
（2）计算乘积，并用变量chenji表示；
（3）将chenji转换成字符串数据，在"
TextBox1"
中输出。
command2_click（）
num1=（text2.text）
num2=（text3.text）
chenji=
Text1.text=
46.某算法的流程图及其编写中的VisualBasic代码如下图所示。
分析流程图，在代码窗口中①处应填写的代码正确的是：
DoWhile
a=
n=n+1
Loop
47．有如下VB程序段，执行完计算其结果是
s=0
i=0
DoWhilei<
=10
IfiMod2=0Then
s=s+i
i=i+1
Else
EndIf
Loop
Prints
48．若s=1*2*3*4*……*n，下列VB程序的功能是求s不大于1000时的最大n值，请将程序中横线处补充完整。
DimsAsInteger,nAsInteger
s=1
n=1
DoWhile
s=
Print"
n="
;
n–1
49.如果一个正三位整数等于它的每个数字的立方和，则称次数为“水仙花数”（如：
153=1^3+5^3+3^3）。
下列程序用于求出100-999之间的所有“水仙花数”，请讲画线处的语句补充完整。
PrivateSubCommand1_Click（）
DimmAsInteger,nAsInteger
DimaAsInteger,bAsInteger,cAsInteger
Form=100To999
a=
b=
c=
n=a^3+b^3+c^3
IfThenList1.AddItemStr（m）
Nextm
50．编写计算1+1/2+1/3+1/4+......+1/100的程序，请填空补充完善程序。
说明：
使用三个控件，
①LABEL控件用于提示说明累加什么。
如：
计算1+1/2+1/3+1/4+......+1/100"
②COMMANDBUTTON控件用于事件单击触发。
③TEXT控件用于显示结果，并放于变量a中。
PrivateSubCommand1_click（）
DimaAsDouble
DimbAsDouble
DimiAsInteger
a=0
Fori=1To
a=a+b
Nexti
Text1.Text=a
三、vb函数练习
Abs（-10）=Int（3.2+5.1）=
Int（-9.9）=sqr（（-2）^2）=
rnd取值范围_________________
int（rnd*10）+10取值范围___________________
int（rnd*10+1）+10取值范围_________________
mid（“abcdefg”,3,2）=len（“abcedfg”）=
val（“456”）=str（123）=
chr（65）=asc（“A”）=
升级会员 