相关试卷
-
1、录制一段时长20秒，采样频率为44.1kHz、量化位数8位的双声道WAVE格式音频，其文件存储容量大小约为（ ）A、3.4MB B、1.7MB C、6.8MB D、340KB
-
2、一张未经压缩1024*768像素的黑白位图，存到计算机中约占多少容量（ ）A、96KB B、1.5MB C、192KB D、768KB
-
3、86版《西游记》已成为无数人心目中的经典，其改编自明代小说家吴承恩同名文学古典名著，原著共有汉字约82万，若将《西游记》原著以文本形式保存到计算机中，约占多少容量（ ）A、200KB B、400KB C、600KB D、1600KB
-
4、如图所示为“二”字的8×8信息编码点阵图，假设空白方块用“0”表示，黑方块用“1”表示，逐行编码。则下列说法正确的是（ ）
A、该汉字编码需要8个字节 B、该汉字编码第5行编码需要2个字节 C、该汉字编码的第1个字节内容是0FH D、该汉字编码的第3行编码是1FH -
5、如图，下列分析正确的是（ ）
A、字符“10”的二进制内码是“01000000” B、字符“杯”的十六进制内码是“B1 AD” C、字符“J”的二进制内码是“01010000” D、字符“！”的内码占一个字节 -
6、如图，存储“2018世界杯，Go！”需（ ）个字节的空间
A、14 B、15 C、16 D、18 -
7、十六进制数10H乘以十六进制数2H，结果用二进制数表示是（ ）A、110010B B、101000B C、10100B D、100000B
-
8、有二进制数1011010B ， 则加下划线对应数字“1”的权值是（ ）A、22 B、23 C、24 D、25
-
9、某幼儿园的绘画创新课上，美术教师让小班的学生在如1图所示的空格系列中用黑色的蜡笔任意涂满空格（涂的格数和位置均不限制，也可一个不涂），则涂成如2图所示情况的概率是（ ）
A、1/32 B、1/16 C、1/8 D、1/64 -
10、每位高一新生入学后都有一个新学号，该号码的组成都有一定的规则，学号的编排过程属于（ ）A、信息的表达 B、信息的采样 C、信息的编码 D、信息的处理
-
11、古人将密报看完后烧毁，以免被他人窃取，这主要体现了信息特征中的（ ）A、载体依附性 B、时效性 C、真伪性 D、可加工性
-
12、编写VB程序，实现如下功能：程序运行时，在文本框Text1中输入任意字符串，单击按钮Command1，删除字符串中的非字母后，新字符串显示在Text2中，并找出ASCII码最小的字母，将其ASCII码显示在Text3中。程序运行界面如下图所示。
(1)、将命令按钮Command1中显示的文本“Command1”修改为“查找”，可在其属性窗口中将属性的属性值改为“查找”。(2)、实现上述功能的VB程序如下，请在划线处填入合适的代码。Private Sub Command1_Click()
Dim result As String, s As String, c As String
Dim n As Integer, i As Integer, j As Integer
s = Text1.Text
Text2.Text = ""
For i = 1 To Len(s)
If n >= 65 And n <= 90 Or n >= 97 And n <= 122 Then
End If
Next i
Text2.Text = result
j = 2
c = Mid(result, 1, 1)
Do While j <= Len(result)
If Mid(result, j, 1) < c Then c = Mid(result, j, 1)
Loop
Text3.Text =
(3)、如图所示，在文本框Text3中的ASCII码是Text2中第个字符的ASCII码。 -
13、编写VB程序，实现如下功能：有一个四位数，此数十位上的数字是7，且这个四位数是一个完全平方数，现要找出符合以上要求的所有四位数，并统计共有几个数。单击Command1按钮，将符合要求的四位数显示在列表框List1中，统计个数显示在标签Label2中，界面如图所示。
(1)、若要修改窗体背景颜色，可在其属性窗口中属性的属性值进行修改。(2)、解决这个问题采用的算法是（填字母：A 、解析算法 B 、枚举算法）(3)、实现上述功能的VB程序如下，请在划线处填入合适的代码。Private Sub Command1_Click()
Dim i As Integer, x As Integer, c As Integer
c = 0
For i = 1000 To 9999
x =
If And x = 7 Then
'将符合条件的四位数显示在列表框中
num = num + 1
End If
Next i
Label2.Caption = "共有："+ +"个"
End Sub
-
14、编写VB程序，实现如下功能：在文本框Text1中输入包含数字、字母、符号等的字符串，单击“统计”按钮Cmd_1，统计该字符串中数字字符的个数，并在标签Label1中输出结果。界面如图所示。
(1)、在设计界面时，应使用右图所示“控件工具箱”中的（填写相应编号）添加“统计”按钮。(2)、为实现上述功能，请在处填入合适代码。Private Sub Command1_Click()
Dim s As String, c As String
Dim i As Integer, n As Integer, num As Integer
s = Text1.Text: num = 0
n =
i = 1
Do While i <= n
c = Mid(s, i, 1)
If Then
num = num + 1
End If
i = i + 1
Label1.Caption = Str(num)
End Sub
(3)、在VB中运行程序，出现“要求对象”的错误，原因是：。 -
15、某算法的VB程序段如下:
i = 1: j = 7: s = ""
key = 34
Do While i <= j
m = (i + j) \ 2
If key = a(m) Then
s = s + "2": Exit Do 'Exit Do 表示退出循环
ElseIf key < a(m) Then
j = m - 1: s = s + "1"
Else
i = m + 1: s = s + "3"
End If
Loop
Text1.Text = s
数组元素a(1)到a（9）的值依次为“15，26，34，47，53，59，60，72，85”。若该程序段执行后，文本框Text1中显示的内容可能是（ ）
A、31 B、132 C、313 D、1312 -
16、某VB程序段如下：
Private Sub Command1_Click()
Dim a As Integer
Dim b As Boolean
a = (a + 1) * 2
b = a - 1
print a:print b
End Sub
程序运行时，单击命令按钮Command1后，变量a和b的值分别是（ ）
A、2 1 B、2 true C、4 -1 D、4 False -
17、执行各选项的VB程序段后，变量s的值为“99以内所有正偶数之和”的是（ ）A、S=0 For i = 2 To 99 Step 2 s = s + 2 Next i B、For i = 2 To 98 s = s + i i = i + 2 Next i C、s = 0 Do While i<= 98 i = i + 2 s = s + i Loop D、i = 2 Do While i<100 s = s + i i = i + 2 Loop
-
18、对于实数x，保留2位小数且第3位四舍五入的VB表达式是（ ）A、Int(x*100)/100 B、Int(x*1000)/100 C、Int(x*100+0.5)/100 D、(x*1000+5)\100
-
19、在VB中设计了如图a所示的界面，图b为所选对象的属性面板，图c为工程资源管理窗口，以下说法正确的是（ ）
①所选对象名称是Circle，属于Shape类；②该窗体所存储的文件名是“草图．frm”；③该VB工程名是工程1；④所选对象运行时不可见。
A、①② B、①②③ C、①③④ D、①③ -
20、某VB程序代码如下：
Dim n As Integer，s As String
n = 64 :s = ""
Do While n > 0
s = Str(n Mod 7) + s
n = n \ 7
Loop
执行该程序段后，变量s的值是（ ）
A、"121" B、121 C、"211" D、211