1.选择题- (共12题)
1.
某VB程序代码如下：
Dim n As Integer
Dim s As String
n = 73
s = ""
Do While n > 0
s = Str(n Mod 8) + s
n = n \ 8
Loop
执行该程序段后，变量s的值是 （ ）
Dim n As Integer
Dim s As String
n = 73
s = ""
Do While n > 0
s = Str(n Mod 8) + s
n = n \ 8
Loop
执行该程序段后，变量s的值是 （ ）
| A．"121" | B．121 | C．"111" | D．111 |
2.
一个VB工程的部分设计界面如下图所示：
下列选项不正确的是( )。
下列选项不正确的是( )。
| A．窗体的Caption属性值是“对象” | B．窗体文件名是“Form1.frm” |
| C．当前选中对象的名称是“Shape1” | D．工程的名称是“工程1” |
11.
小陈申请了一个网银账号，登录网银账号时，要输入密码，一般情况下，如果密码输入的错误次数超过3次，那么当日网银账号将被锁定，次日自动解锁。下图是登陆网银的流程图，小陈不小心输入密码错误了2次，第3次才正确，那么她的操作流程应该是：（ ）
A．① ②③①②③①②③④⑤ |
| B．①②③①②③④⑤ |
| C．①②③④⑤ |
| D．①②③④⑤⑥ |
2.填空题- (共3题)
13.
编写程序输出100~200之间不能被3整除的自然数，并统计出符合条件的个数。
程序如下：
Private Sub Form_Click()
Dim i As Integer
Dim t As Integer
For i = 100 To 200
If __________ Then '不能够被3整除的条件
Print i
t=t+1
End If
Next i
End Sub
程序运行结束后t的值为_______________
程序如下：
Private Sub Form_Click()
Dim i As Integer
Dim t As Integer
For i = 100 To 200
If __________ Then '不能够被3整除的条件
Print i
t=t+1
End If
Next i
End Sub
程序运行结束后t的值为_______________
14.
下列程序的功能是在文本框Text1中显示变量a和b的较大值。
a = 1：b = 2
① If a > b Then
② c = a
Else
③ c = b
End If
④ Text1.Caption = Str(c)
错误在______处，改为___________。
a = 1：b = 2
① If a > b Then
② c = a
Else
③ c = b
End If
④ Text1.Caption = Str(c)
错误在______处，改为___________。
试卷分析
-
【1】题量占比
选择题:(12道)
填空题:(3道)
-
【2】：难度分析
1星难题：0
2星难题：0
3星难题：0
4星难题：0
5星难题：0
6星难题：0
7星难题：0
8星难题：0
9星难题：15