2018-2019学年浙江省台州市温岭市箬横中学高二（上）月考信息技术试卷（10月份）
发布：2024/4/20 14:35:0
一、选择题（共24分，其中1-10题每题2分，11题4分）
-
1．将数学表达式：x2+5x+3写成VisualBasic表达式，正确的是（ ）
组卷：0引用：1难度：0.4 -
2．下列VB表达式的值等于3的是（ ）
组卷：4引用：1难度：0.4 -
3．有如下VB程序段：
a=12
b=54
t=a
a=b
b=t
该程序执行后，变量a,b的值分别是（ ）组卷：8引用：1难度：0.6 -
4．如下VB程序段：
a=3：b=6：c=5
if a＞=b and a＞=c then
y=a
else if b＞=c then
y=b
else
y=c
end if
该程序运行之后，整数型变量y的值（ ）组卷：13引用：1难度：0.5 -
5．在VB中，若用a,b,c分别代表对象名，属性名，属性值，则下列表达形式正确的是（ ）
组卷：3引用：1难度：0.5
二、填空题（共26分，其中第1题每空1分，其余每空2分）
-
15．统计“英文句子单词平均长度”的程序，其实现功能为：在文本框Text1中输入要统计的英文句子，单击“统计”按钮Command1．进行统计，求出句子中共有几个单词、句子单词的平均长度，并显示在标签框Label1中。程序运行界面如图所示。
（1）代码“Private Sub Command1_Click （ ）”中的Command1_Click是（单选，填字母：A．对象名/B．事件名/C．事件处理过程名）。
（2）实现上述功能的VB程序如下，请在横线处填入合适的代码。
Private Sub Command1_Click （ ）
Dim s As String
Dim n As Integer
Dim cnt As Integer
Dim i As Integer
Dim num As Single
Dim cd As Single
Dim ave As Single
s=Text1．Text
n=Len（s）
num=0
cd=0
cnt=0
For i=1To n
①
If c＞=“a“And c＜=“z“or c＞=“A“And c＜=“Z“Then
cnt=cnt+1
ElseIf c＞=“0“And c＜=“9“Then‘单词中可能有数字，也进行统计
cnt=cnt+1
Else
If cnt＞0Then
num=num+1
cd=cd+cnt
②
End If
End If
Next i
ave=cd/num
Label1．Caption=“总共有“+Str（num）+“个单词，平均长度为“+Str（ave）
End Sub组卷：2引用：1难度：0.5 -
16．某数字加密算法描述如下：将某位数字与其位置相加得到num,num除以11的余数即为编号，若余数为0编号为11，从密码表中找出与编号对应的加密字符完成加密。密码表如下：
小明按照上述方法，设计了一个数字加密的VB程序，功能如下：单击“加密”按钮Commandl,程序依次将文本框Text1中每个数字进行加密，并将加密后的密文在文本框Text2中输出。下表显示了数字“2018”的加密过程：编号 1 2 3 4 5 6 7 8 9 10 11 加密字符 V i s u a l B A S I C
程序运行效果如图所示。数字 2 0 1 8 位置 1 2 3 4 编号 3 2 4 1 加密字符 s i u V
（1）设计如图所示的程序界面，至少要使用个类（填数字）。
（2）实现上述功能的VB程序如下，请在横线处填入合适代码。
Private Sub Command1_Click（ ）
Dim s As String,s1As String,s2As String,num As Integer
s=“VisualBASIC“
s1=Text1．Text
s2=““
i=1
Do While①
num=Val（Mid（s1，i,1））+i
num=num Mod 11
If num=0Then num=11
s2=②
i=i+1
Loop
Text2．Text=s2
End Sub
（3）若密文是“uAV”，则明文是。组卷：2引用：2难度：0.5
