VB语言程序设计-在线作业_D 答案

VB 语言程序设计-在线作业_D 用户名：W310201132227最终成绩：100.0
一 单项选择题
1.
0 -1 True False
本题分值： 5.0 用户得分： 5.0 用户解答： True 知识点：
2.
; _ : ,
本题分值： 5.0
以下程序段的输出结果是（ ）。

a = Sqr(3)
b = Sqr(2)
c = a > b Print c
一个语句如果在下一行继续写，应在本行尾部加符号（ ）。

用户得分： 5.0
用户解答： _
知识点：
3.
在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Dim a As Integer, b As Integer
a = InputBox("Enter the First integer")
b = InputBox("Enter the Second integer")
Print b + a
End Sub
程序运行后，单击命令按钮，先后在输入对话框中输入456和123，则输出结果是（）。

123
579
456
123456
本题分值： 5.0
用户得分： 5.0
用户解答： 579
知识点：
4.
设有语句x = InputBox("输入数值", "示例", "20")
程序运行后，如果从键盘上输入数值10并按回车键，则下列叙述中正确的是（）。

变量x的值是数值型数据10
在InputBox对话框标题栏中显示的是“输入数值”
变量x的值是字符串型数据"10"
10是默认值
本题分值： 5.0
用户得分： 5.0
用户解答：变量x的值是字符串型数据"10"
知识点：
5.
假定Picture1和Text1分别为图片框和文本框的名称，下列不正确的语句是（）。

Debug.Print 25
Text1.Print 25
Picture1.Print 25
Print 25
本题分值： 5.0
用户得分： 5.0
用户解答： Text1.Print 25
知识点：
6.
以下语句的输出结果是（）。

(Δ表示空格)
a = 27
b = 65
Print a; b
Δ 27Δ 65
27ΔΔ 65 Δ27ΔΔ 65 27 Δ 65
本题分值： 5.0 用户得分： 5.0
用户解答： Δ27ΔΔ 65 知识点：
7.
空
实时错误，不能产生消息框 AAAA BBBB
本题分值： 5.0 用户得分： 5.0 用户解答： BBBB 知识点：
8.
可以有任意多个按钮
可以有三个按钮 可以有一个按钮 可以有两个按钮
本题分值： 5.0 用户得分： 5.0
执行下面的语句后，所产生的消息框的标题是（ ）。

a = MsgBox("AAAA", , "BBBB", "", 5)
对用MsgBox 显示的消息框，以下叙述中错误的是（ ）。

用户解答：可以有任意多个按钮
知识点：
9.
假定有如下的窗体事件过程：
Private Sub Command1_Click()
a = "Visual Basic程序设计"
b = Left(a, 6)
c = Mid(a, 8)
MsgBox b, 34, c
End Sub
程序运行后，单击命令按钮，则在弹出的消息框的标题栏中显示的信息是（）。

Basic程序设计
Visual
34
Basic
本题分值： 5.0
用户得分： 5.0
用户解答： Basic程序设计
知识点：
10.
下列程序段的执行结果为（）。

x = 2: y = 1
If x * y < 1 Then y = y - 1 Else y = y + 1
Print y - x > 0
False
1
-1
True
本题分值： 5.0
用户得分： 5.0
用户解答： False
知识点：
11.
下列程序段的执行结果为（）。

x = 3: y = 4
If x < y Then Print y;: Print x
4 3
3 4
3
4
本题分值： 5.0
用户得分： 5.0
用户解答： 4 3
知识点：
12.
下列程序的执行结果为（）。

x = 15
If x > 0 Then a = 1
If x > 10 Then a = 2
If x > 20 Then a = 3
If x > 30 Then a = 4
Print a
1
3
4
2
本题分值： 5.0
用户得分： 5.0
用户解答： 2
知识点：
13.
设有函数
1 x < 0
2 x > 0
则下列能正确计算该函数值的语句是（）。

r = If(x < 0, 1, 2)
If x < 0 Then r = 1 Else If x > 0 Then r = 2 End If
If x < 0 Then r = 1 Else r = 2 End If
If x < 0 Then r = 1 Else If x > 0 Then r = 2 End If
本题分值： 5.0
用户得分： 5.0
用户解答： If x < 0 Then r = 1 Else If x > 0 Then r = 2 End If
知识点：
14.
下列代码的运行结果是（）。

If 3 - 2 Then
a = 10
ElseIf (10 / 2) = 6 Then
a = 20
Else
a = 30
End If
Print a
30
10
20
不确定
本题分值： 5.0
用户得分： 5.0
用户解答： 10
知识点：
在窗体上画两个名称分别为Label1和Label2的标签，然后编写如下事件过程：Private Sub Form_Click()
x = -5: s = -5
Select Case s
Case Is > 0
y = x + 1
Case Is >= 0
y = x + 2
Case Else
y = x + 3
End Select
Label1.Caption = x
Label2.Caption = y
End Sub
程序运行后，单击窗体，标签Label1和Label2中显示的内容分别是（）。

-5和-3
-5和-5
-5和-2
-5和-4
本题分值： 5.0
用户得分： 5.0
用户解答： -5和-2
知识点：
5
-1
0 6
本题分值： 5.0 用户得分： 5.0 用户解答： -1 知识点：
17.
Value Align
Sorted Alignment
本题分值： 5.0 用户得分： 5.0
用户解答： Alignment 知识点：
18.
Style Caption Appearance Value
本题分值： 5.0
设a = 6，则执行x = IIf(a > 5, -1, 0)后，x 的值为（ ）。

设置复选框或单选按钮标题对齐方式的属性是（ ）。

通过改变单选按钮控件的什么属性值，可以改变单选按钮的选取状态（ ）。

用户得分： 5.0
用户解答： Value
知识点：
19. Option1.Value = True Check1.Value = False Option1.Value = True Check1.Value = True Option2.Value = False Check1.Value = True
Option1.Value = True Check1.Value = 1
本题分值： 5.0
用户得分： 5.0
用户解答： Option1.Value = True Check1.Value = 1
知识点：
20.
文本框
复选框
框架
窗体
本题分值： 5.0
用户得分： 5.0
用户解答： 框架
知识点：
在窗体上画两个单选按钮，名称分别为Option1和Option2，标题分别为“宋体”和“黑体”；一个复选框，名称为Check1，标题为“粗体”；一个文本框，名称为Text1，Text 属性为“改变文字字体”。

要求程序运行时，“宋体”单选按钮和“粗体”复选框被选中，则能够实现上述要求的语句序列是（ ）。

下面控件中，用于将对象分组的是（ ）。