习 题
一、单项选择题
1、设x=4，y=6，则以下不能在窗体上显示出“A=10”的语句是（ ）
A.PrintA=x+y B. Print"A="；x+y
C. Print"A="+Str(x+y) D. Print"A="&x+y
2、假定有如下的命令按钮(名称为Command1)事件过程：
PrivateSubCommand1_Click()
x=InputBox("输入："，"输入整数")
MsgBox"输入的数据是：”，，”输入数据："+x
EndSub
程序运行后，单击命令按钮，如果从键盘上输入整数10，则以下叙述中错误的是（ ）
A. x的值是数值10 B. 输入对话框的标题是“输入整数”
C. 信息框的标题是“输入数据：10” D. 信息框中显示的是“输入的数据是：”
3、有如下程序
a=3;b=4
PRINT b＜a
END
运行后，输出的结果是 ( )
A. 4＞3 B. -1 C. 0 D. 显示出错信息
4、在窗体（名称为Form1）上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写一个事件过程。程序运行以后，如果在文本框中输入一个字符，则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是（ ）
A. Private Sub Text1_Change() B. Private Sub Command1_Click()
Command1.Caption=”计算机等级考试” Caption=”计算机等级考试”
End Sub End Sub
C. Private Sub Form1_Click() D. Private Sub Command1_Click()
Text1.Caption=”计算机等级考试” Text1.Text=”计算机等级考试”
End Sub End Sub
5、假定有如下的窗体事件过程：
Private Sub Form_Click()
a$ = "Microsoft Visual Basic"
b$ = Right(a$, 5)
c = Mid(a$, 1, 9)
MsgBox a$, 34, b$, c$, 5
End Sub
程序运行后单击窗体，则在弹出的信息框中的标题栏中显示的信息是（ ）
A. Microsoft Visual B. Microsoft C. Basic vb程序设计教程答案第四版刘炳文D. 5
6、窗体上放置了三个文本框，若在Text1中输入456，在Text2中输入78，在程序中执行了语句Text3=Text1+Text2后，则在Text3中显示（ ）
A. 434 B. 45678 C. 溢出 D. 语法错误
7、执行下面的程序，单击窗体，则在窗体上显示的是（ ）。
Option Explicit
Option Explicit
Private Sub Form_Click()
Dim a As Integer, b As Integer, c As Integer
b = 6: c = 6.5
a = b = c
Print a
End Sub
A. 1 B. -1 C. 0 D. 语法错误
说明: False- 0 True -1
8、语句PRINT “INT（-13.2）=”；INT（-13.2）的输出结果为：
A. INT（-13.2）= -13.2 B. INT（-13.2）= 13.2
C. INT（-13.2）= -13 D. INT（-13.2）= -14
二、填空题
1、在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
a = InputBox("请输入一个整数")
b = InputBox("请输入一个整数")
Print a + b
End Sub
程序运行后，单击命令按钮，在输入对话框中分别输入321和456，输出结果为 321456 。
2、执行下面的程序段后，b的值为 300 。
a=300
b=20
a=a+b
b=a-b
a=a-b
3、在窗体上画一个文本框和一个图片框,然后编写如下两个事件过程:
Private Sub Form_Click()
Text1.Text = "VB程序设计"
End Sub
Private Sub Text1_Change()
Picture1.Print "VB Programming"
End Sub
程序运行后,单击窗体,在文本框中显示的内容是 VB程序设计 ,而在图片框中显示的内容是 VB Programming 。
4、在窗体上画一个文本框，然后编写如下事件过程：
Private Sub Form_Click()
x = InputBox("请输入一个整数")
Print x + Text1.Text
End Sub
程序运行时，在文本框中输入456，然后单击窗体，在输入对话框中输入123，单击“确定”按钮后，则在窗体上显示的内容是 123456 。
5、如果在立即窗口中执行以下操作：
a = 8 <CR>(<CR>是回车键，下同)
b = 9 <CR>
Print a > b <CR>
则输出结果是___ False__。
6、在窗体上画一个名称为Command1的命令按钮和三个名称分别为Label1、Label2、Label3的标签，然后编写如下代码：
N=10
Z=10+0=10
Y=0+10=10
X=0+10=10
N=10
Z=10+0=10
Y=10+10=20
X=10+10=20
N=10
Z=10+0=10
Y=20+10=30
X=20+10=30
Private x As IntegerPrivate Sub Command1_Click()
Static y As Integer
Dim z As Integer
n = 10
z = n + z
y = y + z
x = x + z
Label1.Caption = x
Label2.Caption = y
Label3.Caption = z
End Sub
运行程序，连续三次单击命令按钮后，则三个标签中显示的内容分别是_30 30 10。
7、若在一个应用程序窗体上，依次创建了CommandButton、TextBox、 Label等控件，则运行该程序显示窗体时， CommandButton 会首先获得焦点。
8、在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
a$="VisualBasic"
Print String(3,a$)
End Sub
程序运行后，单击命令按钮，在窗体上显示的内容是____VVV___。
9、输入下列程序
Private Sub Command1_Click( )
Text1.Text=”努力”
End Sub
Private Sub Command2_Click( )
Text1.Text=”学习”
End Sub
单击Command2按钮，又单击Command1按钮，在文本框中显示___努力____。
版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。
发表评论