相关试卷
-
1、对称字符串的特征是从左到右读和从右到左读是完全一样的,如“abba”是对称的,“abcba”也是对称的，判断字符串是否对称的VB程序段如下:
n=Len(s) ‘s是待判断的字符串
k=0:j=n
For i=1 To n/ 2
Next i
If k=0 Then Labell Caption=“对称”Else Labell.Caption=“不对称”
方框中的代码由以下三部分组成:
①j=j-1 ②If cl <> c2 Then k=k+1 ③cl=Mid(s,i,l):c2=mid(s,j,l)
代码顺序正确的选项是（ ）
A、①③② B、②③① C、③②① D、②①③ -
2、如下VB 程序代码:
For i=3 to 15 step x
Print “∗”
Next i
下列说法中正确的是（ ）
A、若x的值为3，则显示5个∗ B、若x的值为5，则显示4个∗ C、若x的值为0，则显示0个∗ D、若x的值为-2，则显示1个∗ -
3、以下程序段运行时出现如图所示的错误提示：
For i=1 To 100
If Rnd>0.5 Then
n=n+1
Else
m=m+1
Next i
分析该程序段，该代码中缺少了（ ）
A、For B、End If C、Next D、If -
4、变量a中存储了一个字符，能够正确判断该字符为数字字符“0”~“9”的VB表达式是（ ）A、Asc(a)>=0 Or Asc(a)<=9 B、“0”<=a<=“9” C、a<=“0”Or a>=“9” D、a>=“0”and a<=“9”
-
5、产生[a,b](a,b都是整数且a<b)范围内某一随机整数的VB表达式是（ ）A、Int(Rnd ∗ a)+b B、Int(Rnd ∗ b)+a C、Int(Rnd ∗(b-a+1))+a D、Int(Rnd ∗(b-a))+a
-
6、能正确判断x为偶数的VB表达式是（ ）A、x Mod 2=0 B、Int(x/2)= 0 C、x/2=0 D、x\2=0
-
7、在Visual Basic中,下列能作为变量名的是（ ）A、x+1 B、x_1 C、Or D、If
-
8、【加试题】一个十进制整数的二进制表示中，如果数字“1”的个数多于数字“0”的个数，则称该整数为A类数。如十进制整数26的二进制表示为11010，26是一个A类数。下列VB程序的功能是：统计前1000个自然数中A类数的个数，并在文本框中输出。请在划线处填入合适代码。
Private Sub Command1_Click()
Dim i As Integer, n As Integer
Dim s As Integer, t As Integer, k As Integer
s = 0
For i = 1 To 1000
n = i
t = 0
k = 0
Do While n > 0
If n Mod 2 = 1 Then t = t + 1 Else k = k + 1
Loop
If Then s = s + 1
Next i
Text1.Text = Str(s)
End Sub
-
9、【加试题】数字个数统计。编写VB程序，实现如下功能：在文本框Text1中输入仅由ASCII码字符组成的字符串（长度不超过100），单击“数字统计”按钮Command1，在列表框List1中输出字符串中包含的不同数字及其相应的个数，程序运行效果如下图所示。
(1)、为方便调试，要让程序每次运行时文本框Text1中的初始内容为“ab12*{}78ab12()778ab34”，应修改文本框Text1的属性。(2)、实现上述功能的VB程序如下，请在划线处填入合适代码。Private sub command1_click()
Dim a(0 to 9) as integer ‘数组元素a(i)中存放数字i的个数
Dim s as string , ch as string
Dim t as integer
For i=0 to 9
a(i)=0
next i
s=text1.text
for i=1 to len(s)
if ch>=”0”and ch<=”9” then
t=
a(t)= a(t)+1
end if
next i
list1.clear
for i=1 to 9
if a(i)<>0 then
list1.additem ”数字：”+str(i)+ ”，共有”+ str(a(i))+ ”个”
end if
next i
end sub
(3)、与上述程序中加框处代码运行效果等价的条件表达式可以是。 -
10、小马同学使用Photoshop软件制作了关于荷塘的图片，请回答下列问题。
(1)、改变上图中左下角的参数“100%”为“50%”，图片的容量变小？（选填：正确 或 错误）(2)、目前，“文字”图层显示了种图层样式。(3)、利用“油漆桶”和“编辑”菜单下的“填充”均可改变“文字”图层的文字颜色？（选填：正确 或 错误）(4)、如何删除“荷花”图层中荷花外面的白色像素？。 -
11、编写“加法练习题生成器”程序，实现如下功能：在文本框Text1中输入题数n，单击“生成”按钮Command1，在列表框List1中显示n个两数之和小于100的加法练习题。程序运行界面如图1所示。
图1
图2(1)、在设计程序界面时，应使用图2所示“控件工具箱”中的（填写相应编号）添加“生成”按钮。(2)、实现上述功能的VB程序如下，请在划线处填入合适的代码。Private Sub Command1_Click()
Dim n As Integer, i As Integer, a As Integer, b As Integer
Randomize
n = Val(Text1.Text)
i = ①
Do While i <= n
a = Int(Rnd * 100)
b = Int(Rnd * 100)
If ② Then
List1.AddItem "(" + Str(i) + ")" + Str(a) + "+" + Str(b) + "="
i = i + 1
End If
Loop
End Sub
(3)、运行该程序，在文本框中输入5，单击“生成”按钮后，对语句a = Int(Rnd * 100)执行次数的描述，最合理的是（单选，填字母：A .执行次数等于5 / B .执行次数大于等于5 / C .执行次数小于等于5） -
12、某校对2010～2016年高一新生进校时的视力进行测试，用Excel软件统计数据如图1所示，回答下列问题。
图1
(1)、区域E4:E10的数据是通过公式计算得到的：在E4单元格输入公式后，用自动填充功能完成E5:E10的计算，则E7单元格中的公式是。（提示：近视率（%）=近视人数÷总人数×100）。(2)、在“近视率（%）”已经计算完成的基础上，通过排序使得统计表中各年份数据按“近视率(%)”降序排列，则排序时选择的数据区域应为。(3)、对图2中的所选数据进行筛选操作，筛选设置界面如图3所示，单击“确定”按钮后，筛选结果显示行数据。
图2
图3
(4)、为了更直观的显示近4年新生近视率的变化趋势，利用图4所示数据制作了如图5所示的图表，该图表的数据区域为。
图4
图5
-
13、【加试题】下图为photoshop新建文件界面，若作品完成后，不改变参数保存成BMP图像，其存储容量约为（ ）
A、11MB B、0.46MB C、3.66MB D、1.37MB -
14、【加试题】某算法流程图如下图所示，该流程图对应的程序段为（ ）
A、s = 0 For i = 1 To 20 If i Mod 3 = 0 Then s = s + 2 * i Else i = i + 1 End If Next i B、i = 1 For s = 0 To 20 If i Mod 3 = 0 Then s = s + 2 * i End If i = i + 1 Next i C、i = 1: s = 0 Do While s <= 20 If i Mod 3 = 0 Then s = s + 2 * i Else i = i + 1 End If Loop D、i = 1: s = 0 Do While s <= 20 If i Mod 3 = 0 Then s = s + 2 * i End If i = i + 1 Loop -
15、使用Photoshop软件对“放飞童年.psd”进行处理，编辑界面如下图所示。
下列说法正确的是（ ）
A、删除“枫叶”图层，“风筝”图层也会被删除 B、可以通过拷贝、粘贴图层样式的功能将“花”图层的样式应用到“放飞童年”图层 C、交换“枫叶”图层和“花”图层的位置，不影响画面效果 D、将文件保存为jpg格式，可以看到“风车”效果 -
16、使用UltraEdit软件观察字符“宁波Ningbo！”的内码，部分界面如下图所示。
下列说法正确的是（ ）
A、英文字符“o”的内码表示成十六进制为“A3” B、字符“波”的内码表示成二进制为“10110010 10101100” C、字符“N”用ASCII码进行编码的 D、图中所示“！”的内码占用了一个字节 -
17、在Visual Basic中,若x表示能被5整除的正整数,则下列逻辑表达式的值一定为真的是（ ）A、x / 5=0 B、x Mod 5=0 C、Int(x\5)=0 D、5 Mod x=0
-
18、某算法的部分流程图如下图所示，执行这部分流程，则“s≤100?”被执行的次数是（ ）
A、2 B、3 C、4 D、5 -
19、某十字路口有四个车道，每车道用一个指示灯指明通行状态，每个指示灯的控制码与对应的状态如下表所示。某一时段允许中间2个车道直行对应的控制码如下图所示。
编码
状态
00
不亮
01
红灯
10
黄灯
11
绿灯
若某一时段允许车辆左转，但不允许车辆直行和右转，则此时的控制码应该是（ ）
A、01111101 B、11111101 C、11010101 D、01110101 -
20、利用Access软件创建了关于某时刻电影实时票房的数据表，如下图所示。
下列说法正确的是（ ）
A、该数据库文件名称为“电影实时票房.accdb” B、当前数据表中共有6个字段，4条记录 C、设计数据表时，“票房占比”字段数据类型可以设置为数字 D、“排名”字段一定是自动编号类型