内容发布更新时间 : 2025/3/1 8:14:11星期一 下面是文章的全部内容请认真阅读。

精品资料

习 题

一、单项选择题

1、设x=4，y=6，则以下不能在窗体上显示出“A=10”的语句是（ ） A.PrintA=x+y B. Print\；x+y C. Print\ D. Print\ 2、假定有如下的命令按钮(名称为Command1)事件过程： PrivateSubCommand1_Click() x=InputBox(\输入：\，\输入整数\

MsgBox\输入的数据是：”，，”输入数据：\ EndSub

程序运行后，单击命令按钮，如果从键盘上输入整数10，则以下叙述中错误的是（ ）

A. x的值是数值10 B. 输入对话框的标题是“输入整数” C. 信息框的标题是“输入数据：10” D. 信息框中显示的是“输入的数据是：”

3、有如下程序 a=3;b=4 PRINT b＜a END

运行后，输出的结果是 ( ) A.信息

4、在窗体（名称为Form1）上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写一个事件过程。程序运行以后，如果在文本框中输入一个字符，则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是（ ）

A. Private Sub Text1_Change() B. Private Sub Command1_Click()

4＞3 B.-1 C.

0 D.显示出错

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$ = \ b$ = Right(a$, 5) c = Mid(a$, 1, 9)

MsgBox a$, 34, b$, c$, 5 End Sub

程序运行后单击窗体，则在弹出的信息框中的标题栏中显示的信息是（ ） A. Microsoft Visual B. Microsoft C. Basic D. 5

6、窗体上放置了三个文本框，若在Text1中输入456，在Text2中输入78，在程序

中执行了语句Text3=Text1+Text2后，则在Text3中显示（ ） A. 434 B. 45678 C. 溢出 D. 语法错误

7、执行下面的程序，单击窗体，则在窗体上显示的是（ ）。 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 = \程序设计\ End Sub

Private Sub Text1_Change() Picture1.Print \ End Sub

程序运行后,单击窗体,在文本框中显示的内容是 VB程序设计 ,而在图片框中显示的内容是 VB Programming 。

4、在窗体上画一个文本框，然后编写如下事件过程：

Private Sub Form_Click() x = InputBox(\请输入一个整数\ Print x + Text1.Text End Sub

可修改

精品资料

程序运行时，在文本框中输入456，然后单击窗体，在输入对话框中输入123，单击“确定”按钮后，则在窗体上显示的内容是 123456 。 5、如果在立即窗口中执行以下操作：

a = 8 (是回车键，下同) b = 9 Print a > b

则输出结果是___ False__。

6、在窗体上画一个名称为Command1的命令按钮和三个名称分别为Label1、Label2、Label3的标签，然后编写如下代码：

Private x As Integer

Private 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

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 运行程序，连续三次单击命令按钮后，则三个标签中显示的内容分别是_30 30 10。 7、若在一个应用程序窗体上，依次创建了CommandButton、TextBox、 Label等

控件，则运行该程序显示窗体时，

CommandButton 会首先获得焦点。

8、在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：

Private Sub Command1_Click() a$=\ Print String(3,a$) End Sub

可修改