相关试卷
-
1、目前因特网上常用的搜索引擎有：全文搜索引擎和（ ）A、目录搜索引擎 B、动词搜索引擎 C、条件搜索引擎 D、超链接搜索引擎
-
2、小金用Google在互联网上搜索周杰伦的《菊花台》歌词，以下最有效的关键字是（ ）A、周杰伦歌词 B、周杰伦的《菊花台》的歌词 C、周杰伦菊花台 D、菊花台歌词
-
3、因研究性学习小组的需要，王斌要到动物园收集有关猴子的资料，制作一份电子演示文稿。他去动物园可携带的信息采集工具是（ ）A、数码相机、扫描仪、数码摄像机 B、数码相机、数码摄像机 C、普通相机、数码相机、笔记本电脑 D、普通相机、扫描仪
-
4、林峰想制作一份关于“2019羽毛球总结赛”的电子小报，需要大量素材，下列可以帮助他获得相关素材的途径是（ ）
①上因特网
②向老师咨询
③查阅相关报刊
④看电视专题节目
A、①②③ B、①②④ C、②③④ D、①②③④ -
5、小明决定采用上网的方式查找“奥运会历史上的金牌榜”这是获取信息过程中的（ ）阶段。A、确定信息需求 B、确定信息来源 C、采集信息 D、保存评价信息
-
6、信息技术在不同领域、不同学科的深入应用，将引领信息技术朝着（ ）A、网络化方向发展 B、多元化方向发展 C、多媒体化方向发展 D、虚拟化方向发展
-
7、下列选项中，体现从猿进化到人的重要标志是（ ）A、印刷术的发明 B、文字的使用 C、造纸术的发明 D、语言的使用
-
8、现在我们常常听人家说到IT行业各种各样的消息。那么这里所提到的“IT”指的是（ ）A、信息 B、信息技术 C、通信技术 D、感测技术
-
9、下列关于信息特征的叙述，错误的是（ ）A、“明修栈道、暗渡陈仓”的故事说明了信息具有真伪性的特征 B、天气预报、情报等日常生活事件说明了信息具有时效性的特征 C、“盲人摸象”的故事说明了信息具有依附性的特征 D、信息是不会随着时间的推移而发生变化的
-
10、收听电台广播，其主要的信息载体形式是（ ）A、声音 B、视频 C、文字 D、图像
-
11、古人将文字、符号刻在龟甲上，这主要体现了信息特征中的（ ）A、时效性 B、真伪性 C、载体依附性 D、可加工性
-
12、下列不能称为信息的是（ ）A、报上刊登的广告 B、高一的《信息技术》教科书 C、电视中播放的刘翔打破世界纪录的新闻 D、半期考的各科成绩
-
13、工资问题：某古老的工作和工资计算方式比较奇特，其工作要求如下：必须从1月1日当天开始工作，且连续工作n（n<=365）天才一次性结算得到工资。某年（假设当年为平年）的工资计算细则是：第1天获得1枚金币，接下来的2天（第2天和第3天）每天获得2枚金币，再接下来的3天（第4、5、6天）每天获得3枚金币……，依次类推，即当连续n天每天获得n枚金币后，会在之后的连续n+1天里，每天获得n+1枚金币。小王用VB编写了工资计算程序，当输入连续工作的最后一天的日期后，单击“计算”按钮Command1，程序自动计算工资总额，其运行界面如图所示。
实现上述功能的VB程序如下，请回答下列问题：
(1)、下列选项中，属于鼠标“单击”事件的是。（单选,填字母:A .DbIClick/B .Load/C .Click）(2)、请在划线处填入合适的代码。Private Sub Command 1_Click（）
Dim i As Integer，j As Integer，k As Integer
Dim m As Integer，d As Integer，n As Integer
Dim md As String，sum As Integer
md="312831303130313130313031"
n=0
m=Val（Text1.Text）
d=Val（Text2.Text）
For i=1 To m-1
n= ①
Next i
n=n+d
i=0：j=0
sum=0：k=1
Do While i<n
sum=
j=j+1
If ② Then
j=0
k=k+1
End If
i=i+1
Loop
Text3.Text=Str（sum）
End Sub
① ②
(3)、加框处的代码有错误，请改正。 -
14、编写一个删除数字字符串s中的最大和次大数字字符的程序。具体功能如下：在文本框Text1中输入一个数字字符串，单击“删数”按钮Command1，将删除后的结果显示在文本框Text2中。程序运行界面如图所示。
(1)、要使程序运行时，按钮Command1上显示的标题为“删数”,可在Form_Load事件处理过程中添加语句（单选,填字母:A .Caption.Commandl="删数"/ B .Command1.Caption ="删数"/C .Caption="删数"）。(2)、实现上述功能的VB程序如下,请在划线处填入合适的代码。Private Sub Command 1_Click（）
Dim s As String，ch As String
Dim i As Integer，n As Integer
Dim max1 As Integer，max2 As Integer
s=Text1.Text：n=Len（Text1.Text）
If Mid（s，1，1）>Mid（s，2，1）Then
max 1=1：max2=2
Else
max1=2：max2=1
End If
For i=3 To n
ch=Mid（s，i，1）
If ch>Mid（s，max1，1）Then
①
max1=i
ElseIf ch>=Mid（s，max2，1）Then
max2=i
End If
Next i
For i=1To n
If ② Then Text2.Text=Text2.Text&Mid（s，i，1）
Next i
End Sub
① ②
(3)、若在文本框Text1中输入的内容为“82176736”，单击按钮Command1，文本框Text2中显示的内容是。 -
15、生成0~9组成的10位随机密码，无重复数字出现的VB程序段如下：
s1=“0123456789”
n=Len（s1）
For i=1 To 10
n=n-1
Next i
Text1.Text=s
方框中的代码由以下三部分组成：
①s=s+Mid（s1，x，1）
②x=Int（Rnd*n）+1
③s1=Mid（s1，1，x-1）+Mid（s1，x+1）
代码顺序正确的选项是（ ）
A、①②③ B、③②① C、②①③ D、②③C -
16、有如下VB程序段：
Private Sub Commandl_Click（）
Dim f As Integer，i As Integer
Dim s As
‘①f=1：i=1：s=0
DoWhile
‘②s=s+f * 1/i
f=-1*f
i=i+2
Loop
Text1.Text=Str（s）
End Sub
下列说法正确的是（ ）
A、该程序段没有输入语句，也没有输出语句 B、输出结果为表达式1-1/3+1/5-1/7+1/9-1/11的值 C、若将加框处①改为Integer，输出结果约为0.74 D、若将加框处②改为“i<=12”，计算结果会出错 -
17、在文本框Text1中输入一串字符串，单击“运行”按钮后，程序在列表框List1中输出该字符串的所有子串，程序运行界面如图所示，VB代码如下。
s=Text1.Text
For i=1 To Len（s）
For j= ①
List 1.AddItem ②
Next j
Next i
为实现上述功能,程序段两个划线处的语句分别为 （ ）
A、①i To Len（s） ②Mid（s，i，j-i+1） B、①1 To Len（s）-i+1 ②Mid（s，j，i） C、①i To Len（s）-i+1 ②Mid（s，i，j-i+1） D、①1 To Len（s） ②Mid（s，j，i） -
18、有如下VB程序段：
s=Text1.Text
s1= “ ”
For i=1 To Len（s）
c=Mid（s，i，1）
If c>=“A” And c<=“Z” Then
c=Chr（Asc（c）+32）
Elself c>=“a” And c<=“z” Then
c=Chr（Asc（c）-32）
End If
s1=c+s1
Next i
Text2.Text=s1
该程序段运行后，若在文本框Text1中输入“Ab12CD”，则文本框Text2中显示的内容是（ ）
A、aBcd B、dcBa C、aB12cd D、dc21Ba -
19、小虞编写了一个程序，求数列
、 
……前10项的和，代码如下： s=1/2+2/3：t=1：b=2
For i=3 To 10
Next i
Label1.Caption=“前10项的和是：“+Str（s）
方框中的代码由以下四部分组成：
①b=r ②t=b ③r=t+b ④s=s+r/（r+b）
代码顺序正确的选项是（ ）
A、④③①② B、④③②① C、③④①② D、③④②① -
20、统计连续小写字母最长的个数，编写VB代码如下：
s=Text 1. Text
⑴
ans=0
For i=1 To Len（s）
t=Mid（s，i，1）
If t>=“a” And t<=“z” Then
c=c+1
⑵
Else
⑶
End If
Next i
Text2.Text=Str（ans）
填空处的代码可由以下部分组成：
①c=0 ②c=1 ③If c>ans Then ans=c ④If c<ans Then c=ans ⑤ans=ans+1
正确的代码顺序是（ ）
A、②③① B、①④⑤ C、②④② D、①③①