2016-2017学年浙江省温州市平阳二中高二（上）期中信息技术试卷
发布：2024/4/20 14:35:0
一、选择题（本大题共12小题，每小题2分，共24分）
-
1．在Visual Basic中，语句Text1．Text=“red”执行后，文本框Text1（ ）
组卷：7引用：1难度：0.9 -
2．在VB中，某两个对象的属性窗口如图所示：由图可知，这两个对象的（ ）
组卷：7引用：1难度：0.9 -
3．有如下的程序段：
x=5：y=9
If Not（x＞y） then
x=x+y
else
x=x-y
End if
执行结束后，变量x的值为（ ）组卷：19引用：2难度：0.9 -
4．有如下VB程序段：
a=3：b=4：c=5
If a＞=b And a＞=c Then
y=a
ElseIf b＞=c Then
y=b
Else
y=c
End If
执行以上程序后，变量y值为（ ）组卷：22引用：2难度：0.5 -
5．想产生区间[10，50]的随机整数，以下函数正确的是（ ）
组卷：8引用：1难度：0.7
二、非选择题（本大题共5小题，其中第13小题4分，第14小题4分，第15小题4分，第16小题8分，第17小6题分，共26分）
-
16．现要求编写VB程序，编辑界面如图1所示，运行界面如图2所示，程序功能如下：在文本框Text1中输入n的值，单击“求和”按钮Command1，完成n以内奇数和的计算，并在文本框Text2中显示计算结果．
（1）观察编辑界面和运行界面，发现图1缺少控件，需要添加的对象为（填写对象名称）．
（2）请根据题意将下列程序补充完整．
Private Sub Command1_Click （ ）
Dim n As Integer,s As Integer,i As Integer
①
For i=1To n Step 2
②
Next i
Text2．Text=Str（s）
End Sub
（3）该程序属于算法（选填：枚举/解析）组卷：5引用：1难度：0.3 -
17．编写一个具有下列功能的VB程序：在文本框Text1中输入18位身份证号，单击“提取”按钮Command1，并在文本框Text2中显示出生日期．编辑界面如图1所示，运行界面如图2所示：
（1）按钮显示内容修改为“提取”，是通过修改属性完成的．
（2）请根据题意将下列程序补充完整．
Private Sub Command1_Click （ ）
Dim s As String,x As Integer
S=Text1．Text
x=Len（Text1．Text）
If ①Then
Text2．Text=②
Else
Label2．Caption=”输入的身份证号位数有误，请重新输入”
End If
End Sub.组卷：6引用：1难度：0.1
