1.选择题- (共12题)
1.
使用 Word 软件编辑某文档,部分界面如图所示。下列说法正确的是( )


A.实现图中的图文环绕方式效果可以采用“嵌入型”环绕方式 |
B.单击图中文字“图片欣赏”可直接访问“https://image.baidu.com/” |
C.文中有 3 处修订,1 处批注,添加批注用户名是“a” |
D.修订状态下,用“查找替换”功能替换的文字不会带有修订标记 |
2.
某ASCII 码字符加密方法描述如下:
(1)以 1 个字节为单位进行处理
(2)高位段(左边 4 位)左移一位,最低位用左移出的最位高填充,低位段(右边 4 位)右移一位,最高位用右移出的最低位填充
分别将上述两段二进制转换为十六进制,所得两位十六进制依次连接即为密文则字符“H”的密文是( )
(1)以 1 个字节为单位进行处理
(2)高位段(左边 4 位)左移一位,最低位用左移出的最位高填充,低位段(右边 4 位)右移一位,最高位用右移出的最低位填充
分别将上述两段二进制转换为十六进制,所得两位十六进制依次连接即为密文则字符“H”的密文是( )
A.84 | B.23 | C.C0 | D.72 |
3.
下列关于信息的说法,正确的是( )
A.人脑虽然能记忆,但是不能作为信息的载体 |
B.扫描二维码并关注公众号的过程属于信息的编码 |
C.信息技术包含微电子技术、通信技术、计算机技术和传感技术等 |
D.信息有载体依附性,所以不可以脱离它所反映的事物被存储、保存和传播 |
4.
下图是通过 VB 程序读取“GDP2018.accdb”文件中的 GDP 总量,显示在列表框中,部分代码实现如下:

Private Sub Command1_Click() ’列表框中
输出 b(i),代码略End Sub
Private Sub Form_Load()
conn.ConnectionString="Provider=Microsoft.AC

Private Sub Command1_Click() ’列表框中
输出 b(i),代码略End Sub
Private Sub Form_Load()
conn.ConnectionString="Provider=Microsoft.AC
A.OLEDB.12.0;DATASource="& App.Path & "\GDP2018.accdb" conn.Open:Set myrecord.ActiveConnection = conn:myrecord.Open "GDP" n = 0 Do While Not myrecord.EOF n = n + 1 a(n) = myrecord.Fields("2018") b(n) = Left(myrecord.Fields("Area"), 5) & " " & myrecord.Fields("2018") myrecord.MoveNext Loopconn.Close: myrecord.Close: Set myrecord = Nothing: Set conn = Nothing End Sub 下列说法不正确的是( ) |
B.ConnectionString 是实例 conn 的属性 B.myrecord.Fields("2018")返回当前记录中“2018”字段的值 |
C.a(1)读取后执行myrecord.MoveNext 将读取下一条记录,即 a(2)=“中国” |
D.myrecord.Fields("2018")也可以写成 myrecord.Fields(3) |
7.
有如下 VB 程序段:
Function fact(n As Integer) As String If n = 1 Then
fact = fact & 1
Else
fact = fact(n \ 2) & n Mod 2
End If
End Function
Private Sub Command1_Click()
Dim x As String, i As Integer, r As Integer x = Text1.Text
For i = 1 To Len(Text1.Text)
End Sub
在文本框Text1 中输入 2019.70,则执行程序段,在文本框 Text2 中显示的内容是( )
Function fact(n As Integer) As String If n = 1 Then
fact = fact & 1
Else
fact = fact(n \ 2) & n Mod 2
End If
End Function
Private Sub Command1_Click()
Dim x As String, i As Integer, r As Integer x = Text1.Text
For i = 1 To Len(Text1.Text)
If Mid(x, i, 1) = "." Then Exit For Next i
r = Val(Mid(x, i + 1, Len(Text1.Text) - i)) Text2.Text = fact(r)End Sub
在文本框Text1 中输入 2019.70,则执行程序段,在文本框 Text2 中显示的内容是( )
A.1000110 | B.70 | C.350 | D.100011 |
8.
有下列 VB 程序段:
Dim strA As String, strB As String strA = "hongda":strB = ""
For i = 1 To Len(strA) * 2 If i / 2 = Int(i / 2) Then
该程序段运行后,变量 strB 的值是( )
Dim strA As String, strB As String strA = "hongda":strB = ""
For i = 1 To Len(strA) * 2 If i / 2 = Int(i / 2) Then
strB = strB + Chr(Asc(Mid(strA, (i - 1) Mod Len(strA) + 1, 1)) + 2) End If
Next i该程序段运行后,变量 strB 的值是( )
A."jpfqic " | B."qicqic" | C."phbqic" | D."qicoga" |
9.
采用拉锯式排序法对无序数组元素实现降序排序,即前一遍把最大的元素从右到左送到最左的位置,后一遍把最小的元素是从左到右送到最右的位置,实现该功能的 VB 程序段如下:

c = 1: s = 10
Do While c <= s
For i = s To c + 1 Step -1
If
Then
t = a(i - 1): a(i - 1) = a(i): a(i) = t
End If
Next i
For i =
If
Then
t = a(i + 1): a(i + 1) = a(i): a(i) = t
End If
Next i
c = c + 1
s = s - 1
Loop
上述程序段三个方框处的语句分别为( )

c = 1: s = 10
Do While c <= s
For i = s To c + 1 Step -1
If

t = a(i - 1): a(i - 1) = a(i): a(i) = t
End If
Next i
For i =

If

t = a(i + 1): a(i + 1) = a(i): a(i) = t
End If
Next i
c = c + 1
s = s - 1
Loop
上述程序段三个方框处的语句分别为( )
A.① a(i - 1) < a(i) ② c +1 To s – c ③ a(i) <a(i + 1) |
B.① a(i - 1) > a(i) ② c +2 To s – c ③ a(i) >a(i + 1) |
C.① a(i - 1) < a(i) ② c +1 To s – c-1 ③ a(i) <a(i + 1) |
D.① a(i - 1) > a(i) ② c+ 2 To s – c+1 ③ a(i) >a(i + 1) |
10.
将一幅 1920×1080 像素,颜色位深度为 24 位的 BMP 图像文件,另存为 JPG 图像文件后,存储容量为( )
552KB,下列说法不正确的是
552KB,下列说法不正确的是
A.BMP 图像和 JPG 图像均属于位图 |
B.BMP 图像文件容量约为 5.9MB |
C.此过程属于有损压缩 |
D.压缩比约为 8:1 |
11.
使用 Access 软件打开数据表,部分界面如图所示,当前状态下下列说法不正确的是( )


A.“班级藏书”表不能进行重命名 |
B.“收藏日期”字段的数据类型是“日期/时间” |
C.“书籍编号”字段无法删除,可能该字段被设置为主键 |
D.“是否借出”字段数据类型改为“文本”后,其字段的值变为“yes”/“no” |
试卷分析
-
【1】题量占比
选择题:(12道)
-
【2】:难度分析
1星难题:0
2星难题:0
3星难题:0
4星难题:0
5星难题:0
6星难题:0
7星难题:0
8星难题:0
9星难题:12