相关试卷
-
1、小明在VB中定义了以下函数，功能是求a和b的最大公约数。
Function gcd(a As Integer, b As Integer) As Integer
Do While b＞0
c＝a Mod b
a＝b
b＝c
Loop
End Function
调试中发现计算结果一直是0。经过仔细观察与分析，发现错误的原因是( )
A、函数名有错 B、变量c没有定义 C、函数没有返回值 D、b＞0应该改为b＞＝0 -
2、下面VB程序的功能为：在文本框Text1和Text2中输入两个整数，单击按钮对象Command1，在标签对象Label1中显示这两个数的差。
Function lsc(x，y) As Integer
If x＞y Then
lsc＝x－y
Else
lsc＝y－x
End If
End Function
Private Sub Command1_Click( )
Dim a1 As Integer，a2 As Integer
a1＝Val(Text1.Text)
a2＝Val(Text2.Text)
Label1.Caption＝
End Sub
要实现上述功能，程序画线处应填入的语句为( )
A、lsc(x，y) B、lsc(Text1.Text，Text2.Text) C、lsc D、lsc(a1，a2) -
3、有如下VB程序段：
Dim i As Integer，c As String，s As String，t As String
s＝“China2014IT”：t＝“”
For i＝1 To Len(s)
c＝Mid(s，i，1)
If c＞＝“a” And c＜＝“z” Then t＝t＋c
Next i
Label1.Caption＝t
该程序段运行后，标签Label1中显示的内容是( )
A、2014 B、ChinaIT C、hina D、CIT -
4、有如下Visual Basic程序段：
m = a(1)
i =2
Do While i <= 10
If m < a(i) Then m = a(i)
i =i+ 1
Loop
该程序段执行后，变量m中存储的是（ ）
A、a(1)至a(10)中的最大值 B、a(1)至a(10)中的最小值 C、a(2)至a(10)中的最大值 D、a(2)至a(10)中的最小值 -
5、篮球联赛中，有5个班级的比赛积分依次为14，11，13，8，9。若采用冒泡排序算法对其进行从小到大排序，则完成第二遍时的结果是( )A、8，11，13，14，9 B、8，9，13，14，11 C、8，9，14，11，13 D、14，13，11，9，8
-
6、小英创作主题为“小镇故事”的多媒体作品。她使用Photoshop软件制作一张背景图片，请回答下列问题：(1)、小英想通过“画布大小”命令将画布由600*400改为600*338，若按此调整，则图像将被(填字母：A .缩小/B .放大/C .裁剪)。(2)、当前的图层面板如图所示，若在“鸟群”图层上执行“拷贝图层样式”命令，再在“鸟群倒影”图层上执行“粘贴图层样式”命令，则“鸟群倒影”图层上的图层样式有 (填图层样式名称)。
(3)、选中背景图层，执行滤镜-模糊-高斯模糊，这个操作执行。（能 / 不能）(4)、小英完成了设计后，为了便于以后修改，她应该把作品保存为格式。 -
7、利用VB程序计算三角形面积。在文本框Text1、Text2、Text3中分别输入三角形三条边长a，b，c，半周长p ＝ (a ＋ b ＋ c) / 2，单击按钮Command1计算三角形的面积s＝ ，并把结果显示在文本框Text4中。界面如图a所示，请回答下列问题：
(1)、结合图b，若要把窗体背景色改为白色，可通过其属性进行设置。
(2)、实现上述功能的VB程序如下，请在划线处填入合适代码。Private Sub Command1_Click()
Dim a, b, c, p, s As Integer
a ＝ Val(Text1.Text)
b ＝
c ＝ Val(Text3.Text)
p ＝(a ＋ b ＋ c) / 2
If a＋b>c And a＋c>b And b＋c>a And a>0 And b>0 And c>0 Then
s ＝
Text4.Text ＝
Else
Text4.Text ＝“输入边长不能组成三角形！”
End If
End Sub
-
8、下图是2015年临海市事业单位公开招聘工作人员递补入围资格复审人员名单(二)，请根据图中信息回答下列问题。
(1)、笔试总成绩为综合基础知识或专业知识成绩(上午)和职业能力测验成绩(下午)组成，两部分成绩各占50%，在单元格H3中输入的公式是 ， 然后利用自动填充功能完成剩余笔试总成绩计算。(2)、为计算排名值，可先对记录按笔试总成绩字段 ， 然后利用自动填充功能在单元格I3：I13输入1、2、3……13。(3)、如果要选出所有护理岗位工作人员的信息，可以使用的工具是_ (填字母编号)。A、
B、
C、
D、
(4)、某同学根据表格数据制作了一张柱形图，如下图所示，笔试总成绩计算好后，图表(选填：会/不会)出现柱形。
-
9、某算法的流程图如图所示，执行该算法后，输出s的值是( )
A、6 B、12 C、18 D、36 -
10、下表为古城绍兴宣传片的媒体元素分解表，已获取的素材文件有wz.jpg、bj.mp3、jj.doc、hy.swf，则表中的①②③④位置应填入的文件依次为( )
元素类型
元素内容
获取方法
文件
声音
背景音乐
百度下载
①
文本
古城绍兴简介
绍兴官网
②
图片
绍兴风景
网上获取和现场拍摄
③
动画
绍兴欢迎你
Flash创作
④
A、sx.jpg、bj.mp3、jj.doc、hy.swf B、sx.jpg、hy.swf、bj.mp3、jj.doc C、bj.mp3、sx.jpg、jj.doc、hy.swf D、bj.mp3、jj.doc、sx.jpg、hy.swf -
11、某算法的部分流程图如图所示，执行这部分流程后，变量s，i的值分别是( )
A、14、6 B、14、8 C、8、6 D、8、8 -
12、2016年10月19日3时31分，神舟十一号飞船与天宫二号自动交会对接成功。小贝使用Photoshop软件设计关于天宫二号的图片，现要从图中选择天宫二号对象，可使用的工具是( )
A、矩形选框工具 B、磁性套索工具 C、裁剪工具 D、魔棒工具 -
13、汉字点阵码是一种用黑白两色点阵来表示汉字字形的编码，通常用二进制数0表示黑色，1表示白色。一个16×16点阵字模的存储容量为( )A、1字节 B、16字节 C、32字节 D、64字节
-
14、下载某手机APP应用时，如下图所示：
关于该软件，下列说法不正确的是( )
A、该软件的评价方式完全采用了个人推荐 B、软件有74893条评价 C、该软件是一款影音视听类软件 D、软件评分9分，说明软件质量很好 -
15、已知某进制数的等式满足：101+1=110和110-1=101，则下列说法正确的是( )A、该等式为八进制数加法运算 B、该等式为十六进制数加法运算 C、该等式计算结果110，转换为十进制数为6 D、该等式计算结果101，转换为十六进制数为65
-
16、下列计算机病毒描述错误的是( )A、计算机病毒是人为编制的程序 B、安装了杀毒软件后电脑就不会感染病毒 C、计算机感染病毒后的症状有：运行速度慢、经常死机或重启、文件莫名丢失、账号被盗、上网时电脑被控制等 D、经常安装操作系统Windows的漏洞补丁，能有效防止病毒和黑客入侵
-
17、2015年中国实行“互联网＋”行动计划后，传统企业依托互联网平台，如微信公众号和官方网站等发布企业信息，便于用户网上了解及购买，从而带动社会经济实体的又一轮迅猛发展，这体现了信息的( )A、时效性 B、载体依附性 C、共享性 D、真伪性
-
18、计算机的基本功能是计算，信息加工处理本质上都是通过计算完成的。现有一图像模糊处理的算法，以10*10像素图像的模糊处理为例，具体算法如下：
1）各像素点的颜色信息值（介于0至255之间的一个正整数，由计算机随机生成），存储至数组a中，a的排列方式如图a所示。
图a
2）给定模糊处理对分模糊中心位置p和模糊半径r（r>1）。
①确定模糊中心点在如下数阵中的位置。若模糊中心为36时，该模糊中心在数阵中对应位置为第4行第6列；
②根据中心点和模糊半径确定模糊处理的像素点的范围
3）依序将模糊处理范围内的像素点进行模糊处理。模糊处理的方式为：每个像素点的新颜色信息值为该像素点上下左右相邻四个像素点颜色信息值的平均值（取整数）。
图b
程序运行时，列表框List1中显示图像模糊前的信息，在文本框Text1中输入模糊的中心点p，在文本框Text2中输入模糊的半径r，单击命令按钮Comman的后在列表框List2中输出模糊后的图像信息。程序运行界面如图b所示，椭圆标记的为模糊中心p，矩形框表示的为模糊范围。
实现上述功能的VB程序如下。请回答下列问题：
Const n = 10
Dim a(1 To 10 * 10) As Integer
Private Sub Command1_Click()
Dim p As Integer, r As Integer
Dim x As Integer, y As Integer
Dim i1 As Integer, i2 As Integer, j1 As Integer, j2 As Integer
Dim i As Integer, j As Integer
Dim k As Integer, k1 As Integer, k2 As Integer, k3 As Integer, k4 As Integer
Dim s As String
p = Val(Text1.Text)
r = Val(Text2.Text)
x = (p - 1) \ n + 1
①
i1 = x - r + 1: i2 = x + r - 1
j1 = y - r + 1: j2 = y + r - 1
If i1 < 1 Then i1 = 1: If i2 > n Then i2 = n
If j1 < 1 Then j1 = 1: If j2 > n Then j2 = n
For i = i1 To i2
For j = j1 To j2
k = (i - 1) * n + j
k1 = (i - 2) * n + j
k2 = i * n + j
k3 = (i - 1) * n + j - 1
k4 = (i - 1) * n + j + 1
a(k) = (a(k1) + a(k2) + a(k3) + a(k4)) \ 4
Next j
Next i
s = ""
For i = 1 To n * n
s = s + adj(a(i), 5)
If i Mod n = 0 Then
List2.AddItem s
s = ""
End If
Next i
End Sub
Private Sub Form_Load()
Dim i As Integer, j As Integer
Dim s As String
For i = 1 To n
s = ""
For j = 1 To n
②
s = s + adj(a((i - 1) * n + j), 5)
Next j
List1.AddItem s
Next i
End Sub
Function adj(x As Integer, y As Integer) As String
Dim t As String, i As Integer
t = Str(x)
For i = 1 To y - Len(t)
t = " " + t
Next i
③
End Function
(1)、若p=57，如图a所示数阵，模糊中心位于第行。(2)、请在划线处填入合适的代码。① ② ③
-
19、在Excel中，列号采用字母的形式表示，具体表示方法如下：
序号
第1列
第2列
……
第25列
第26列
列号
A
B
Y
Z
序号
第27列
第28列
……
第51列
第52列
列号
AA
AB
AY
AZ
……
序号
第703列
第704列
……
第727列
第728列
列号
AAA
AAB
AAX
AAZ
为了方便查看，小明编写了“Excel列号转换”程序，程序运行时，用户在文本框Text1中输入数字列号，点击按钮command1，在文本框Text2中输出它的字母列号；反之在文本框Text2中输入字母列号，单击按钮command2，在文本框Text1中输出它的数字列号。程序运行界面如图所示：
程序运行的代码如下，请回答下列问题：(1)、要修改窗体的标题为“EXCEL列号转换”，可通过修改其属性完成。(2)、第106列的字母列号为。(3)、请在①②③划线处填入适当的代码。'将数字列号转换为字母列号
Private Sub Command1_Click( )
Const code = “ABCDEFGHIJKLMNOPQRSTUVWXYZ”
Dim s As String
Dim n As Integer
Dim r As Integer
①
s =“”
Do While n > 0
②
n = n \ 26
s = Mid（code, r, 1） + s
Loop
Text2.Text = s
End Sub
'将字母列号转换为数字列号
Private Sub Command2_Click( )
Dim s As String
Dim n As Integer
Dim ch As String
s = Text2.Text
n = 0
For i = 1 To Len（s）
ch = Mid（s， i， 1）
③
Next i
Text1.Text = Str（n）
End Sub
-
20、小明制作主题为“瓢虫的世界”的Flash多媒体作品，如图所示，请回答下列问题：
图a
(1)、在制作该Flash作品之前，小明先进行了分析和规划，下列属于应用需求分析的是 （多选，填字母）A、该Flash作品将用于小学生科学课堂上展示 B、该作品的主题思想是展示瓢虫的生活习性 C、该作品将制作成学习型作品，在观看某段视频讲解后有对应试题，考察学生掌握情况 D、该作品将发布成exe格式 E、该作品将在每天的活动课上制作，预计需要两周时间(2)、将一个GIF文件“瓢虫.gif”导入库中直接得到一个影片剪辑元件，则该元件中动画的动画类型是。（单选，填字母，A .形状补间动画/B .动画补间动画/C .逐帧动画）(3)、舞台的大小为550×400像素，“瓢虫”图层设置动画补间动画实现瓢虫从左下侧飞入舞台后再从舞台右上侧飞出，补间动画首尾关键帧中的“瓢虫”实例的位置坐标最有可能为 （单选，填字母，A. 首（-50，280）、尾（580，50）/B .首（-50，-280）、尾（580，-50）/C .首（50，-280）、尾（-580，50））。(4)、为使翠鸟在飞到指定位置后一直停留在该位置，对翠鸟图层可行的操作是 （多选，填字母）A、选择翠鸟图层第46帧，进行清除帧操作 B、选择翠鸟图层第46帧，进行清除关键帧操作 C、选择翠鸟图层第46帧，进行删除帧操作 D、选择翠鸟图层第45帧复制帧，粘贴至第46帧 E、选择翠鸟图层第46帧，将库中的翠鸟元件拖到舞台上合适位置。(5)、测试影片时，单击“片头”场景中的“进入”按钮，实现声音暂停播放同时影片跳转到“主场景”第1帧并开始播放，弹出如图b所示的错误提示窗口。则“进入”按钮上正确的动作脚本为。
图b