相关试卷
-
1、下列VB表达式中，不是字符串的是（ ）A、Chr（（Rnd*26）+65） B、Len（"中国2019"） C、Mid（"r12b"，2，2） D、（n+1） Mod 5&6
-
2、有如下VisualBasic自定义函数:
Function f（x As Integer） As Single
f=Abs（x）
End Function
该函数返回值的数据类型是（ ）
A、整数型 B、日期型 C、逻辑型 D、单精度实数型 -
3、某算法的部分流程图如下图所示，执行这部分流程后，输出c，s的值分别是（ ）
A、8，10 B、10，14 C、12，6 D、12，24 -
4、有如下VB程序段:
Fori=1 To 3
For j=6 To i+1 Step-1
If a(j) > a(j-1) Then
k=a(j): a(j)=a(j-1): a(j-1)=k
End If
Next j
s=s+“"”+str(a(i))
Next i
Text1. Text=str(s)
数组元素从a（1）到a（6）的数据依次为“3、7、25、8、9”，经过该程序“加工”后，文本框Text1中显示的是（ ）
A、2 3 5 B、9 8 7 C、3 7 2 D、7 3 2 -
5、有如下程序：
Private Sub Command1_Click()
Dim a(5) as Integer
Dim n as Integer, i as Integer
n=Val(Text1.Text)
i=0
a(1)=1: a(2)=1
For i=3 To n
a(i)=a(i-1)+a(i-2)
Next i
Label1.Caption=a(i)
End Sub
若在Text1中输入5，则点击按钮后的运行结果为（ ）
A、Label11中输出5 B、Label1中输出10 C、报“下标越界”错误 D、Label11中无内容 -
6、下列程序执行后文本框Text1显示的内容是（ ）
x= "abcdcba": ans = 0
For i= 1 To Len(x) \2.
If Mid(x， i， 1) = Mid(x， Len(x)-i+ 1， 1) Then ans = ans+ 1
Next i
Text1.Text = Str(ans)
A、1 B、2 C、3 D、4 -
7、在VisualBasic中，能表示整数x是完全平方数（如=3*3，9是完全平方数）的表达式是（ ）A、x^2=x*x B、sqr(x)=x\2 C、int(sqr(x))^2=x D、(x\2)^2=x3
-
8、小明在高中数学中学到了离散型随机变量的数学期望概念，即离散型随机变量的一切可能的取值Xi与对应的概率pi乘积之和称为该离散型随机变量的数学期望。公式为：
在程序设计课上，小明设计了一个程序用来计算离散型随机变量的数学期望，Text1中交替输入随机变量和相应概率，并以逗号“，”为分隔符，具体界面如下图所示。
(1)、上图窗体标题“数学期望计算”是通过设置窗体的属性实现的。(2)、程序代码如下，下划线处填上合适代码。Private Sub Cmd_Click()
Dim s As String， t As String， c As String，X As Single， p As Single， EX As Single
Dim n As Integer， k As Integer
s = Text1.Text
n = Len(s)
k = 0: EX = 0: t = ""
For i = 1 To n
c = Mid(s， i， 1)
If c = "，" Then
k = k + 1
If Then
X = Val(t)
Else
p = Val(t)
EX =
End If
Else
t = t + c
End If
Next i
Text2.Text =
End Sub
(3)、若Text1中输入：“1，0.3，2，0.3，3，0.4，”，则单击“计算”按钮后，Text2中显示。 -
9、星猫接收到一组外星人空间坐标，经过初期破译，获悉它是二进制代码，其中“/”代表0，“\”代表1，“|”代表分隔符。编写破译程序，在文本框Text1输入外星人坐标，单击“解密”按钮，在文本框Text2输出地球人坐标。运行界面如下图所示。
(1)、代码中“Private Sub Cmd_Click()”中的“Cmd_Click”是（填字母，A .对象名，B .事件名，C .事件处理过程名）(2)、阅读下列代码，下划线处填上合适代码。Private Sub Cmd_Click()
Dim dec As Integer， n As Integer， i As Integer， w As Integer
Dim s As String， c As String， sd As String
s = Text1.Text
n =
sd=""
For i = 1 To n
c =
If c <> "|" Then
If c = "/" Then
w = 0
Else
w = 1
End If
dec =
Else
sd = sd + Str(dec) + "，"
dec = 0
End If
Next i
Text2.Text = sd
End Sub
(3)、如上所示，如果输入的外星人坐标，漏了最后一个“|”，那么输出的地球人坐标是。 -
10、小李为2022年北京与张家口联合申办的冬奥会做了一个宣传动画片，部分制作画面如
图a所示。请回答下列问题：
图 a
(1)、舞台中的“吉祥物”实例来源于库中“吉祥物”影片剪辑元件。编辑库中的“吉祥物”元件，舞台中的“吉祥物”实例（选填：会/不会）随之改变。(2)、图a中，“人物”图层补间动画应用库中的“运动员”图形元件实例制作而成，实现在滑雪的同时移动到舞台右侧，说明该图层的补间动画类型为（填字母：A .动画补间 ； B .形状补间 ； C .逐帧动画）。(3)、“退出”按钮的部分编辑界面如图b所示，测试影片时发现该按钮不能实现点击效果，下列可行的解决方法是 （多选，填字母）。
图 b
A、选择“图形”图层的点击帧，执行“删除帧”命令 B、选择“图形”图层的按下帧，执行“清除帧”命令 C、选择“图形”图层的按下帧，执行“清除帧关键”命令 D、选择“文字”图层的点击帧，执行“插入空白关键帧”命令(4)、测试影片时，在场景播放结束后自动跳转到“申办”场景的第一帧并停止，则“ac”图层第45 帧添加的动作命令为。(5)、若要将作品发送给同学欣赏，并支持交互，应将作品发布为（多选，填字母：A ．fla ； B ．swf ； C ．exe ； D ．gif）格式。 -
11、小王为了解国外新冠疫情，根据2020年6月10日数据制作了“国外TOP10国家疫情统计汇总”表。
图a
(1)、如图a所示，“死亡占比（%）”反映“死亡”人数与“累计”得病人数之间的占比关系（死亡占比（%）=死亡/累计*100），G4：G12由G3单元格向下自动填充完成，则G3中的公式为：。(2)、如图a所示，对图中所有国家，以“死亡占比（%）”为主要关键字降序排序，则排序时应选择的数据区域为：。(3)、根据图a数据，制作如图b所示图表，则该图表所使用的数据区域为：。
图b
(4)、复制A2：G12的数据区域到新工作表，新工作表中设置“死亡”和“死亡占比（%）”列筛选条件均如图c所示，最终筛选出的国家是。
图c
-
12、编写一个程序，计算出满足1+2+3+…+n<100的n的最大值，并在文本框Text1中显示出来。
Dim s As Integer ‘’变量s存放和
Dim n As Integer
n = ① '为n赋初值
s = ② '为s赋初值
Do While s < 100
n = n + 1
s = s + n
Loop
Text1.Text = Str( ③ )
程序空格处，①、②、③应分别填写（ ）
A、 0，0，n B、 0，0，n-1 C、 1，0，n-1 D、 0，1，n -
13、阅读下列程序代码：
Dim s As String， c As String
Dim i As Integer， n As Integer， p As Integer
s = Text1.Text
n = Len(s)
p = 1
For i = 1 To n
c = Mid(s， i， 1)
If c >= "A" And c <= "Z" Then
t = c + t
Else
t = Mid(t， 1， p - 1) + c + Mid(t， p， Len(t) - p + 1)
p = p + 1
End If
Next i
Text2.Text = t
如果文本框Text1中输入“ABCD@1234”，则文本框Text2中输出（ ）
A、 ABCD@1234 B、 @1234ABCD C、 @1234DCBA D、 1234@ABCD -
14、有如下程序段：
x＝"10"：y＝"5" : z="8"
If x>y Then w＝x+y Else w＝x+z
该程序段运行后，w的值为( )
A、15 B、105 C、18 D、108 -
15、下图所示是一幅jpg格式图像相关参数，压缩比为6：1，该jpg格式图像文件容量为（ ）
A、122KB B、10KB C、1MB D、967KB -
16、使用Photoshop软件对“杭州G20.psd”进行处理，编辑界面如下图所示。下列说法不正确的是（ ）
A、该文档采用的颜色模式为RGB颜色模式，位深为8bit B、添加一个新的文字图层，该操作前后，所发布的BMP格式文件大小不变 C、可以重命名“G20标志”图层的图层名，并将图层位置调整到水墨画图层上方 D、“荷叶”图层可以设置图层样式，“背景”图层可以添加滤镜 -
17、用GoldWave软件编辑某音频文件，部分界面如图所示。下列说法正确的是（ ）
A、当前状态下，执行“静音”操作，音频文件容量会变小 B、当前状态下，执行“插入静音”操作，音频文件容量会变大 C、当前状态下，执行“剪裁”操作，音频文件容量会变小 D、该文件是立体声音频，有两个声道，采样频率为352kbps -
18、下列关于计算机信息编码的描述，不正确的是（ ）
A、字符“z”的十六进制机内码是“80” B、图中字符共占16个字节，其中有8个ASCII码 C、“！”的机内码为“A3 A1” D、汉字在计算机内部是用机内码表示的 -
19、某算法的部分流程图如图所示。执行这部分流程，若输入x的值为23，则输出n的值为（ ）
A、3 B、4 C、5 D、6 -
20、用 Access软件设计某学生管理信息系统的数据库，其中“学生表”中需要存储如图所示的数据，学号的前4位是入学年份，第5-6位为学校编码，末三位为流水号同一学校内部不重复。
学号
姓名
性别
出生年份
户籍所在地
注册日期
是否住校
201909001
张三
男
2003
柯桥街道
2019/8/1
是
201909002
李四
女
2004
柯岩街道
2019/8/1
否
…
…
…
…
…
…
…
下列关于该学生管理信息系统的描述，错误的是（ ）
A、“学号”字段可以设置为主键，作为记录的唯一标识 B、数据表中同一字段的字段值的数据类型一定相同 C、数据表视图中，删除第二条记录后，不能撤回该“删除”操作 D、若“是否住校”字段类型为“是否”型，其值可以通过输入“是”或“否”实现