相关试卷
-
1、编写VB应用程序，当用户输入的一串由字母、数字等字符组成的字符串，统计其中每个字母出现的次数(不分大小写)。程序运行时界面如图a所示。
图a
(1)、设计应用程序界面时，为添加标签对象“输入字串：”，应使用图b所示的“控件工具箱”中的(填写相应编写)，并在图c所示的“属性窗口”中，将属性设置为“输入字串：”。
(2)、程序运行时，在Text1中输入字符串，单击“统计”按钮，在List1中显示统计结果。请在划线处填入合适代码。函数 IsLetter(x)功能，若 x 是字母，则返回值为字母 x 在字母序列“A”～“Z”中的序号，如字母“A”的序号为 0，字母“D”的序号为 3。若 x 不是字母，则返回值为－1。
Function IsLetter(x As String) As Integer
If ”A” <＝ x And x <＝ ”Z” Then
IsLetter ＝ Asc(x) － Asc(”A”)
ElseIf ”a” <＝ x And x <＝ ”z” Then
IsLetter ＝ Asc(x) － Asc(”a”)
Else
①
End If
End Function
Private Sub Command1_Click()
Dim f(25) As Integer, m As Integer, n As Integer
Dim s As String, c As String
List1.Clear
For m ＝ 0 To 25 '初始化数组 f
f(m) ＝ 0
Next m
s ＝ Text1.Text
For m ＝ 1 To Len(s)
c ＝ Mid(s, m, 1) '依次读取字符串中的每个字符进行判断
②
If n <> －1 Then f(n) ＝ f(n) ＋ 1
Next m
For m ＝ 0 To 25
If ③ Then '输出统计结果，没有出现的字母不输出
List1.AddItem(Chr(m ＋ Asc(”a”)) & ”：” & f(m))
End If
Next m
End Sub
① ② ③
-
2、编写“简单密码筛选”程序，实现如下功能：在文本框Text1中输入连续多组数字密码，之间以空格符分隔，筛选出简单密码（即一组密码中所有数字均相同），单击“筛选密码”按钮 Commandl，将简单密码显示在列表框 List1 中，简单密码个数显示在文本框 Text2中。程序运行界面如图a所示。
图a
(1)、程序运行时，提示如图b所示的出错信息，导致出错的是下列哪条语句（单选，填字母：A .s=Text1.text； B .List.clear C.Text2.Text = Str(cnt)）
图b
(2)、实现上述功能的VB程序如下，请在划线处填入合适的代码。Private Sub Command1_Click()
Dim s As String, c As String, tmp As String
Dim i As Integer, cnt As Integer
Dim flag As Boolean
cnt=0 : flag = True
List.Clear: s = Text1.Text: Text1.text=""
For i = 1 To Len(s)
ch = Mid(s, i, 1)
If ch >= "0" And ch <= "9" Then
tmp = tmp + ch
If Len(tmp) > 1 Then
If ① Then flag = False
End If
Else
If flag Then
List1.AddItem tmp: cnt = cnt + 1
Else
flag = True
End If
tmp = ""
End If
Next i
If flag Then List1.AddItem tmp: cnt = cnt + 1
If ② Then Text2.Text = "找不到" Else Text2.Text = Str(cnt)
End Sub
① ②
(3)、成功修改第1题中错误的程序代码后，若文本框Text1中输入的内容为“11 456 7 4443 488 666666”，单击“筛选密码”按钮，文本框Text2中显示的内容是。
-
3、小黄创作主题为“夏日荷塘”的多媒体作品。他首先使用Photoshop软件制作一张图片，然后使用Flash软件制作动画。请回答下列问题：(1)、如图a所示，当前状态下，下列操作可行的是 (多选,填字母：A . 给“背景”图层添加“镜头光晕”的滤镜效果/ B . 修改“夏日荷塘”的字体类型为“隶书” / C . 将“荷花”图层移到“荷叶”图层下方/ D .选中“2018”图层后，对其内容进行填充)。
图a
(2)、如图b所示，“最美的月色”图层从第21帧到第40帧实现文字从完全透明到完全显示的动画效果，该动画类型属于 (选填字母:A .逐帧动画/ B .动画补间/ C .形状补间)。
图b
(3)、如图b所示,舞台上“重播”字样的实例来自于库中“重播”按钮元件，修改该实例的大小，库中“重播”按钮元件的大小 （选填：会/不会）作相应改变。(4)、如图b所示,库中的音频素材时长为20秒,“音乐”图层的声音“同步”方式设置为“数据流”,在不影响其它动画效果的情况下，要实现“最美的荷塘”动画结束时音乐也停止播放, 下列操作方法可行的有 。(多选，填字母:A .选择“音乐”图层第21帧至40帧，然后执行“删除帧”操作 / B .在“音乐”图层第21帧上执行“插入空白关键帧”操作 / C . 在“最美的月色”图层第21帧上添加动作脚本“stop();” / D .在“最美的月色”图层第21帧上添加动作脚本“stopallsounds();”)。(5)、测试影片时,单击“按钮”图层的“重播”按钮,将从该场景的第1帧开始播放,则该按钮的动作脚本为 。 -
4、小黄收集了2018年第一季度长三角城市的进出口经济指标，并使用Excel软件进行数据处理，如图a所示。
图a
请回答下列问题：
(1)、如图b所示，若要为表格数据设置绿色的粗边框线，正确的操作顺序是（单选，填字母：A .⑤①③，B . ①②③，C. ①③②，D . ①④③）
图b
(2)、区域F3:F20的数据是通过公式计算得到的：在F3单元格输入公式后，用自动填充功能完成F4:F20的计算，则F3单元格中的公式是 。(3)、如图a所示，若要对江苏省各城市的出口占总额百分比按降序进行排序，则排序时选择的数据区域是 。(4)、为直观完整地呈现浙江省所有城市进口额和出口额的数据对比，小黄制作了如图c所示的图表，但未将宁波市选进去，则完整的数据区域应该是：。
图c
-
5、如下程序：
Private Function f(x As Single, n As Integer) As Single
If n ＝0 Then
f ＝1
Else
If n Mod 2 ＝1 Then
f＝x * f(x, n\2)
Else
f＝f(x, n\2) \x
End If
End If
End Function
Private Sub Command1_Click()
Label1.Caption＝Str(f(4, 6))
End Sub
程序运行时，单击按钮Command1，标签Label1显示的内容是（ ）
A、1 B、4 C、27 D、64 -
6、有VB 程序如下：
Private Sub Command1_Click()
Dim s1 As String, s2 As String, ch As String
s1 ＝ Text1.Text
s2 ＝””
ch ＝””
For i ＝ 1 To Len(s1)
ch ＝ Mid (s1, i, 1)
If Asc(ch) <＝ 122 And Asc(ch) >＝ 97 Then
ch ＝Chr(Asc(ch) － 32)
End If
If Asc(ch) >＝ 65 And Asc(ch)<＝ 90 Then
ch ＝ Chr(65 ＋ (Asc(ch) － 62) Mod 26)
End If
s2 ＝ s2 ＋ ch
Next i
Text2.Text ＝ s2
End Sub
已知大写字母A的ASCII码值为65，且小写字母的 ASCII 码为对应的大写字母的ASCII码加上32。运行上述程序，若文本框Text1 中的内容为“Text1”，单击命令按钮 Command1，则文本框Text2中将显示（ ）
A、Whawl B、WHAW1 C、Whaw3 D、WHAW3 -
7、声音文件“配音.wav”的属性为“Wave PCM signed 16 bit,44100Hz,立体声”, 时长为1分钟，在Goldwave中将其另存为“配音.mp3”，保存后其文件大小为 1MB，则压缩比为（ ）A、10：1 B、10：2 C、80：1 D、80：2
-
8、使用Flash软件编辑“大鹏展翅”动画，部分编辑界面如下图所示。下列说法不正确的是（ ）
A、若大鹏有挥动翅膀的动画效果，则大鹏实例的元件类型可能是影片剪辑 B、对“大鹏”图层第15帧执行“清除关键帧”操作，该图层上将出现虚线 C、“按钮”图层第30帧上添加了动作脚本 D、改变“背景”和“声音”图层的上下顺序，不影响动画的播放效果 -
9、使用Photoshop软件制作“荷塘春色”作品，部分界面如图所示。下列说法正确的是（ ）
A、“背景”图层可以使用“自由变换”命令 B、将作品存储为bmp格式后，“荷塘春色”图层仍保留 C、“蝴蝶1”和“蝴蝶2”图层可合并为一个图层 D、“大树”图层的图层名不能直接修改 -
10、某算法部分流程图如下图所示。执行这部分流程，依次输入 7、-5、12，0，则输出值是（ ）
A、12 B、17 C、-20 D、5 -
11、下列关于数据冗余和数据压缩的说法中，正确的是（ ）A、一幅图像中可能同时存在着多种冗余类型 B、声音文件只能进行有损压缩 C、将文件从BMP存为JPG，再从JPG存为BMP格式，颜色不会有任何损失 D、无损压缩比有损压缩的压缩率高
-
12、使用UltraEdit软件查看字符内码，部分界面如下图所示
下列说法正确的是（ ）
A、英文字符“j”的十六进制内码为70H B、汉字“慈”的二进制内码为10110100 11001000B C、图中所有字符占用12个字节 D、小写字符“y”的内码为79H，则可推断出“y”比“Y”的内码值大20D -
13、关于Access数据库和数据表，下列说法正确的是（ ）
A、当前状态下可以直接删除“2015”数据表 B、单击“
”按钮可以移动到第6条记录
C、当前数据表的数据不能导出到Excel电子表格
D、“住宿”字段的数据类型可能为文本
-
14、使用Word软件进行图文处理，下列说法正确的是（ ）A、删除批注对象，批注内容也将被删除 B、审阅功能有助于多人同时编辑文档 C、可以在Word中对图像添加滤镜 D、自动更正功能体现了人工智能技术
-
15、小明用IE浏览一个图文并茂的网页，地址栏信息为“http://www.nb.gov.cn/index.html”。
下列描述不正确的是（ ）
A、若要把该网页的图文信息只存放在一个文件中，应保存为mht格式 B、可以将该网址收藏在一个名为“地方政府”的收藏夹中 C、网页内容是由HTML(即超文本传输语言简称）描述的 D、HTTP是一种网络传输协议，主要用于浏览器与Web服务器之间的信息传输 -
16、下列有关信息的说法，正确的是（ ）A、5G技术使信息的传播范围更广，传播速度更快 B、比特币是一种电子货币，它能在全世界范围内进行合法交易 C、编写一个能在12306网站上进行抢票的程序并广泛传播，这是合法的 D、信息能脱离它所反映的事物被存储
-
17、小吴创作“狐狸和乌鸦”故事的多媒体作品。她首先使用Photoshop软件制作一张背景图片，请回答下列问题。
(1)、如图所示，当前编辑的文件有个图层。(2)、如图所示，若对“树”图层中的内容适当缩小，其他图层的内容不变，合适的做法是。（选填：A或B;A .执行菜单操作“编辑/自由变换”、B .执行菜单操作“图像/图像大小”）(3)、如图所示，“狐狸和乌鸦”图层显示的图层样式是。（选填：投影/外发光）(4)、如图所示的图层设置，如要把该图像文件修改后作为网页图片，最适合的格式是（选填：.psd/.bmp/.jpg）,保存成该格式后,图像文件中图层个数为个(选填:1/2/3/4) -
18、小张收集了某城市20种主要食品平均价格的数据，并用Excel软件进行数据处理，如图所示。请回答下列问题。
(1)、如图所示工作表中，区域G4：G23中的数据是通过公式计算得到的：选择该区域中的一个单元格，输入公式，然后用自动填充功能完成其他单元格的计算。 G4单元格的公式是。(提示：涨跌幅（％) =(本期价格(元)-上期价格(元))/上期价格(元)×100)
(2)、为了更加直观地比较蔬菜类价格波动情况，小张制作了如图所示的图表。该图表，称为。（选填：条形图、折线图、柱形图） 该图表的数据区域是B3,B18:B23,E3:F3, 。
(3)、若将F23单元格中的数据改为7.06，则图表中“豆角”的“本期价格（元）”对应的数据条将(选填：升高 / 不变 / 降低）。(4)、为了筛选出上期价格和本期价格相同的所有食品，应对列设置筛选条件。 -
19、小安同学参加了学校的作文比赛，并把自己的文章做成了一个电子小报，如下图，请回答下列问题。
(1)、制作该电子小报较为合适的软件是(选填：A .Flash B .Excel C .word)(2)、文章写好后，要将段落开头空两格，可以打开“格式”菜单中的“段落”命令，选择(选填：A .悬挂缩进B .首行缩进)。(3)、小报顶端的“菁菁校园”是属于页面中的 (选填：A .页眉 B .页脚 C .艺术字)(4)、若要修改纸张大小设置，可选择文件菜单下的（选填：A .稿纸设置 B .页面设置）选项。(5)、单击图中B所指的对象后，弹出与之相关的工具栏如下图所示：
由此判断，图中B所指的对象最有可能是：（选填：A .图片B .艺术字C .文字）。
-
20、下面活动中，涉及了人工智能实际应用的是（ ）A、陈林在编辑声音时，遇到疑难问题，通过BBS发贴子与网友交流 B、李平使用扫描仪把报纸上的文字资料以图像文件格式保存到计算机里 C、星期日上午，王朋同学与父母在数码广场购买相机 D、李文同学访问了http：//WWW-ai.ijs.sileliza. htm网站，与机器人eliza对话时，eliza连续回答了“Pleass go on”。