康一中2019—2020学年第一学期初三第二次月考试卷
信息技术
（答题时间：30分钟试卷满分：100分）
卷首寄语：把自信写在脸上，把成功写在纸上，相信自己是最棒的。
选择题：（下列每题均只有一个正确答案，请将正确答案的代号涂在答题卡相应位置处。共50题，每题2分，共100分。）
Print“aFe”&“64”的结果为：（）
A.afe64B.“aFe64”C.aFe&64D.aFe64
Print“cab”&78的结果为：（）
A.cab&78B.“cab78”C.“cab&78”D.cab78
Print“58”+“96”的结果为：（）
A.“58+96”B.“5896”C.154D.5896
4.Print“72+”+“Ab8D”的结果为：（）
A.72+AB8DB.“72++Ab8D”C.72+Ab8DD.72++Ab8D
5.Print103+“180”的结果为：（）
A.103+180B.103180C.“103180”D.283
6.Text1.text=Val(89)
Label1.Caption=Val(100)
C=Text1.text+Label1.Caption
Form1.printC
以上程序的输出结果为（）
A.89+100B.89100C.“189”D.189
7.a=Val(333)
b=Val(222)
C=a+b
Form1.printC
以上程序的输出结果为（）
A.333222B.333+222C.“333222”D.555
8.算术运算符优先级顺序为()
A.^、-、/、、\、Mod、+、-B.^、-、、\、/、Mod、+、-
C.^、-、、/、\、Mod、+、-D.^、-、、Mod、/、\、+、-
9.3^22+2mod10\4=
A.20B.12C.18D.17
10mod3+30\102=
A.9B.7C.2D.2.5
在运行滚动条控件的过程中，当拖动滑块的时会触发滚动条的（）
A.Click事件B.Scroll事件C.Change事件D.Load事件
12.条件“x≠18或x≠20”，用VB表达式应该表示（）
x<>18andx<>20B.notx=18andnotx=20
C.x≠18orx≠20D.notx=18ornotx=20
vb中常用的算法有三种，分别是：（）
A.类比法、穷举法、递归法B类比法、计算法、递归法
C.穷举法、递归法、解析法D解析法、类比法、穷举法
14.下列赋值语句正确的是（）
B+C=AB.A=B+CC.-B=AD.5=A+B
15.Int（22.63）的结果是
A.22.63B.23C.22D.22.7
16.表示条件x，y都是奇数的逻辑表达式是（）
A.Xmod2=0Andymod2=0B.Xmod2=1Orymod2=1
C.Xmod2=0Orymod2=0D.Xmod2=1Andymod2=1
17.数学表达式数学表达式,在VB程序设计语言中可以表示为：（）（注：sqr（）为开平方函数）。
A．-b+sqr(b^2–4ac)/(2a)
B．(-b+sqr(bb–4ac))/2a
C．(-b+sqr(b2–4ac))/(2a)
D．(-b+sqr(b^2–4ac))/(2a)
18.如图所示流程图所定义的程序结构是（）
A.顺序结构B.分支结构C.循环结构D.树形结构
19.下列程序段的输出结果为（）
a=“ZhongGuo”
b=“2019”
Printb+a
A.ZhongGuo2019B.2019ZhongguoC.Zhongguo2019D.2019ZhongGuo
20.以下程序用来判断一个整数Tai是否为偶数，并将其中的偶数在窗体上显示，请补充完该程序。
IfTaiMOD2=____ThenPrintX
A.0B.1C.2D.-1
21.如右图所示流程图所定义的程序结构是（）
A.顺序结构B.分支结构C.循环结构D.树形结构
22.如下图所示算法的输出结果是（）
A.-5B.5C.-1D.2
23.VB中可以用来作为变量名称的是()
A．Y_BB.8EC.KCD.String
24.语句print“59+63”输出结果是。
A.5963B.“5963”C.122D.59+63
Val(“123.45.3”)=
A.123B.123.45C.123.45.3D.“123.45.3”
Val(“a123你好”)=
A.123B.a123C.“a123你好”D.0
27.VB中，执行print“2010”&7后，输出（）
A.20107B.2010&7C.20107D.2007
28.以下不属于VB运算符的是（）
A.选择运算符B.关系运算符
C.逻辑运算符D.字符串运算符
29.下面程序段的循环步长是_____
Fori=1to1000
S=S+i
Nexti
A．不确定B.1000C.1D.0
30.设x=6,y=16,z=9，以下表达式x>zOrz
A.TB.FC.TrueD.False
31.有如下VB程序段
PrivateSubCommand1_Click()
DimmAsInteger,nAsInteger,aAsInteger
m=Val(Text2.text)
n=Val(Text1.text)
a=m
m=n
n=a
Text3.text=m
Text4.text=n
EndSub
运行后在文本框Text1、Text2中分别输入36、81，则Text3、Text4分别输出的结果为（）
A.36、36B.81、36C.36、81D.81、81
32.如下所示的VB程序，运行时在Text1、Text2、Text3中分别输入12、9、8三个数，请问Text4输出结果为（）
PrivateSubCommand1_Click()
DimaAsSingle
DimbAsSingle
DimcAsSingle
a=Val(Text1.Text)
b=Val(Text2.Text)
c=Val(Text3.Text)
c=a+b
Text4.Text=c
EndSub
A.21B.8C.12D.9
33.本程序的功能是计算2468……20，下列依次填空为（）
PrivateSubCommand1_Click()
DimsAsDouble
DimiAsDouble
DimcAsSingle
s=1
Fori=To20Step
s=si
Print“2468……20=”&s
EndSub
A.2、1、NextsB.2、2、NextsC.2、1、NextiD.2、2、Nexti
34.如果变量a、b的值分别为4.8和1，则下列语句中循环体的执行次数是:
ForI=atobstep-1
PrintI
NextI
A.3B.5C.4D.6
35.在窗体中添加一个命令按钮Command1，并编写如下程序：
PrivateSubCommand1_Click()
x=text1.text
Ifx^2=16Theny=x
Ifx^2<=16Theny=1/x
Ifx^2>=16Theny=x^2+1
Printy
EndSub
程序运行后，在text1.text中输入4，单击命令按钮，程序的运行结果是（）
A.16B.4C.0.25D.17
&、Mod、And、＜＞分别属于（）运算符
关系、算术、逻辑、字符串B.字符串、算术、关系、逻辑
C.字符串、算术、逻辑、关系D.关系、算术、字符串、逻辑
37.a=80
b=268
a=a+b
b=a-b
a=a-b
则a的值为
A.188B.348C.268D.80
38.水平滚动条的活动滑块处于最右端时，是最值，垂直滚动条的活动滑块处于最方时，是最小值。
A.大、下B.大、上C.小、下D.小、上
39.a=2
Ifa=1Thena=a+1
Ifa=2Thena=a+1
Ifa=3Thena=a+1
Ifa=4Thena=a+1
程序结束后a的值为________
A.2B.3C.4D.5
40.下列程序是求1-100之间累乘的积，下列依次填空为（）
DimaAsInteger
DimbAsInteger
(
For(=1to100
(
Nextb
A.a=0；b；a=abB.b=0；a；b=abC.a=1；b；a=abD.b=1；a；b=ab
41.下面是交换变量x与y的值的程序，空白处应填（）。
x=16
y=56
z=x
x=y
_________
Printx，y
x=zB.z=yC.y=xD.y=z
VB中，在窗体上添加一个命令按钮(名称为Command1)，然后编写如下程
序段：PrivateSubCommand1_Click()
b=30
c=“60”
a=b+c
Printa
EndSub
程序运行后，单击命令按钮Command1，输出的结果是()。
A.30+60B.3060C.90D.“3060”
x=3
Fori=3To5Step2
x=x+i
Nexti
程序运行后x的值为________A.5B.6C.11D.7
44.3mod6的值、17/5的值、21\2的值分别是。
A.0、3.4、10B.3、3、10.5C.0、3、10.5D.3、3.4、10
45.a=9
b=11
Printa>b
程序运行结果是()
TrueB.TureC.FlaseD.False
46.如下VB程序段，执行后，循环体print“VB”的执行次数是_____次。
Dimaasinteger
Dimbasinteger
a=5:b=10
Fori=aTobstep2
Print"VB"
NextiA.2B.3C.4D.5
47.有如下程序段，程序最后的运行结果中y、x的值分别为_________。
PrivateSubCommand1_Click()
DimxAsInteger,yAsInteger
Fori=1To2
x=x+1
y=y+2
Nexti
Printx,y
EndSub
A.2、4B.1、2C.4、2D.2、1
48.在VB中，执行以下程序段，输出的结果是()。
PrivateSubCommand1_Click()
DimxAsInteger
DimyAsInteger
x=56
y=32
Printx>=y
EndSub
A.56>=32B.TrueC.FalseD.Flase
49.执行如下程序段后，x的值为。
x=2
Ifx>0Thenx=x+1
Ifx>2Thenx=7
Printx
A.2B.3C.7D.9
50.当在Text2中输入圆的半径后，计算圆的周长，并在Text1中显示出来,下列依次填空为（）
Constpi=3.14????
DimcAsSingle?,rAsSingle????
r=Val(_____①_______)
c=2pir
_______②__________=c
Text1.Caption；Text2.CaptionB.Text1.text；Text2.text
C.Text2.Caption；Text1.CaptionD.Text2.text；Text1.text
第1页共4页
|
|
