相关试卷
-
1、一幅未经压缩的1024×768像素，16色的BMP图像存储容量约为（ ）A、1536KB B、384KB C、768KB D、12288KB
-
2、用Access创建一张班级学生体检情况的数据表，如图所示，
下列有关该数据表的说法中，正确的是（ ）
A、“性别”字段的类型是“是否型” B、该表至少有6个字段。 C、该表共有27条记录。 D、该数据表的名称是“学生体检情况表.accdb”。 -
3、关于Access数据表的操作，下列说法正确的是（ ）A、数据表可以是一维的，也可以是二维的。 B、数据表结构创建好后就不能再修改。 C、数据类型为自动编号的字段值不能被编辑。 D、修改字段名，数据表中相应字段值也会改变。
-
4、老师在修订模式下对小明写的新闻报道进行修改，如图所示。
下列说法中，正确的是（ ）
A、共有2处批注 B、用户添加批注的对象为：2017年第一次 C、单击“修订”命令后，将开启修订模式，批注的内容将会消失。 D、单击“接受修订”命令后，右边的“删除的内容”框将会消失。 -
5、小明在制作Word文档时，要将文档中所有的“他”改为“它”，他可以使用的Word功能是（ ）A、修订 B、批注 C、自动更正 D、查找和替换
-
6、OCR软件是用来识别图像中的文字。下列四个文件中，不能使用OCR软件来识别的是（ ）A、考试.rtf B、考试.bmp C、考试.tif D、考试.jpg
-
7、超市的每件商品上都有一个二维码，通过此二维码可以获知商品的名称和价格等信息。二维码按位来表示，每位上可以划一条竖线，也可以不划竖线。那么，6位二维码可以表示（ ）件不同的商品。A、16 B、32 C、64 D、128
-
8、使用UltraEdit软件观察字符内码，结果如图所示：
则字符“TOP5”的内码是（ ）
A、54 4F 50 37 B、54 4F 50 35 C、54 4F 50 33 D、54 4F 50 31 -
9、下列数值最大的是（ ）A、110110B B、65D C、44H D、60D
-
10、买家对某产品的评价如图所示，该评价采用的评价方式是（ ）
A、统计评价 B、个人推荐 C、专家评价 D、核心刊物评价 -
11、下列有关信息的说法，正确的是（ ）A、青少年应该拒绝浏览因特网信息，以维护身心健康。 B、用搜索引擎搜索到的信息都是可信的。 C、为了信息安全，计算机中重要数据要定期进行备份。 D、网络购物支付时，应将买家的支付账户和密码告知卖家。
-
12、李雷收到了朋友发给他的一封奇怪的邮件，里面有段内容是由一些数字和符号组成，信上面说了，这段内容是加密后的内容，并给出了具体加密方法（假定原文的英文字母都是大写的），具体方法如下：
⑴“A”变为一个1到100内的随机数*27+1，“B”变为一个1到100内的随机数*27+2，……，“Z”变为一个1到100内的随机数*27+26；
⑵每个字母变为数字后会加上一个“—”用来分割数字；
⑶其他空格和标点字符都按原来的表示。
李雷利用VB编写了一个解密程序，功能如下：将邮件中密文的内容复制到文本框Text1中，点击“解密”按钮Command1后，程序会将密文解密并将解密后的内容显示在文本框Text2中。程序运行界面如图所示：
(1)、根据描述，若密文为“1905-1442-”，则表示的是：(2)、实现上述功能的VB程序如下，请在划线处填入合适代码。Private Sub Command1_Click()
Dim s As String, yw As String, tAs String
Dim value As Integer '用于存储某字母在密文中对应数值的临时变量
s = Text1.Text
value = 0
yw = ""
For i = 1 To Len(s)
t = ①
If t >= "0" And t <= "9" Then
value = value * 10 + Val(t)
ElseIf t = "—" Then
yw = yw + Chr(Asc("A") + value Mod 27 -1)
②
Else
yw = yw + t
End If
Next i
Text2.Text = yw
End Sub
① ②
-
13、用蒙特卡洛法求圆周率PI的近似值，其算法如下：使用随机函数Rnd,随机生成两个[0,1）之间的随机数，由此构成一个投点坐标（x,y），然后根据x2+y2<=1投点是否在圆内来求PI的近似值。其中总共随机投点n次，统计落点在单位圆内的点数为s,则4s/n即为所求PI的近似值。程序界面如图所示，在Text1中输入投点的个数，单机“计算”按钮，PI的近似值结果显示在Text2中。）
(1)、要使得按钮的文字显示为“计算”，应该修改该对象的属性。(2)、要实现上述功能，请在划线处填入合适代码。Private Sub Command1_Click()
Randomize '随机数初始化
Dim i As Long, n As Long, s As Long
Dim x As Double, y As Double, z As Double
n = Val(Text1.Text)
s = 0
Do While i <= n ' 随机投点n次
x = Rnd: y = Rnd
z =
If z <= 1 Then
s = s + 1
End If
i = i + 1
Loop
Text2.Text =
-
14、以下Visual Basic程序的功能是：在文本框Text1中输入一个两位数x，将个位上的数和十位上的数互换组合成新的两位数y，并在文本框Text_2中输出新数。
Private Sub Command1_Click()
Dim x As Integer, y As Integer
Dim i As Integer, j As Integer
x=val(text1.text)
i=x \ 10
_____________ ①
y=j*10+i
Text1.Text = y ②
End Sub
(1)、为了实现上述表达式的计算，①处应填写的是。(2)、程序中②处的表达式有误，应更正为。 -
15、有如下程序段，该程序段运行后，e的值为() i的值为() j的值为()
e=0
For i=2 to 10 step 2
For j=1 to 6
If (i+j) mod 3=0 then e=e+1
Next j
Next i
-
16、使用两种不同的VB程序段实现相同的功能：则划线处填入的代码正确的是（ ）
A、For g=1 to 6 B、For g=2 to g+6 C、For g=1 to 6 step 2 D、For g=1 to 6 step = 2 -
17、有如下Ｖisual Basic程序：
Private Sub Command1_Click()
Dim sum As Double, x As Double
sum = 0
n = 0
For i = 1 To 5
x = n / i
n = n + 1
sum = sum + x
Next i
End Sub
该程序通过For循环计算一个表达式的值，这个表达式是（ ）
A、1+1/2+2/3+3/4+4/5 B、1+1/2+2/3+3/4 C、1/2+2/3+3/4+4/5 D、1+1/2+1/3+1/4+1/5 -
18、某Visual Basic程序如下：
Private Sub Command1_Click()
Dim s As String, i As Integer
s = ""
For i = 1 To 10 Step 2
s = Str(i) + s
Next i
Text1.Text = s
End Sub
运行程序，单击命令按钮Command1后，在文本框Text1中显示的内容为（ ）
A、13579 B、1 3 5 7 9 C、9 7 5 3 1 D、97531 -
19、下面程序段运行后，变量T的值为（ ）
T=1：K=1
Do While K<=5
T=T*K
K=K+2
Loop
A、3 B、15 C、120 D、60 -
20、第1次，将1张正方形纸片沿垂直和水平中线对折后撕开，变成4张纸片，第2次，从4张纸片中取其中1张纸片也照上面方法撕开，变成7张纸片，一直这样下去。描述计算撕了n次后纸片总数s的算法部分流程图如下图所示：
空白矩形框中应该填入的是( )
A、s←s+2 B、s←s+3 C、s←s+j D、s←s*3