如果Forml是启动窗体,并且Forml的load事件过程中有form2.show,则程序启动后()A、发生一个运行错误B、发生一个编译错误C、在所有的初始化代码运行后,Form1是活动窗体D、在所有的初始化代码运行后,Form2是活动窗体

如果Form1是启动窗体，并且Form1的Load事件过程中有Form2.Show，则程序启动后（ ）。

A．发生一个运行时错误

B．发生一个编译时错误

C．在所有的初始化代码运行后Form1是活动窗体

D．在所有的初始化代码运行后Form2是活动窗体

A、发生一个运行时错误

参考答案：

C、在所有的初始化代码运行后Form1是活动窗体

D、在所有的初始化代码运行后Form2是活动窗体

如果希望以模态方式显示窗体Form1，下列正确的语句是( :>。

A. Forml. Show 0

B. Forml. Show

C. Forml. Show 1

D. 以下都不正确

在新建一个VB工程时，将新建窗体的Name属性设置为TheFirst，则默认的窗体文件名为（ ）。

A.forml．frm

B.工程1．frm

C.TheFirst．frm

D.Forml．vbp

设工程文件包含两个窗体文件Forml.frm、Form2.frm及一个标准模块文件Modulel.bas。两个窗体上分别只有一个名称为Command1的命令按钮。 Forml的代码如下： Public x As Integer Privme Sub Form_Load() x=1 y=5 End Sub Private Sub Command1_Click() Form2.Show End Sub Form2的代码如下： Private Sub Command1_Click() Print Form1.x，y End Sub Modulel的代码如下： Public y As Integer 运行以上程序，单击Form1的命令按钮Command1，则显示Form2；再单击Form2上的命令按钮Command1，则窗体上显示的是( )。

A．1 5

B．0 5

C．0 0

D．程序有错

在新建一个Visual Basic工程时，将新建窗体的Name属性设置为TheFirst，则默认的窗体文件名为( )。

A．Forml.rrm

B．工程1.frm

C．TheFirst.fim

D．Forml.vbp

工程中有Form1、Form2两个窗体。Forml窗体外观如图1所示。程序运行时，在Forml中名称为Text1的文本框中输入一个数值(圆的半径)，然后单击命令按钮“计算并显示”(其名称为Commandl)，则显示Form2窗体，且根据输入的圆的半径计算圆的面积，并在Form2的窗体上显示出来，如图2所示。如果单击命令按钮时，文本框中输入的不是数值，则用信息框显示“请输入数值数据!”。请填空。

Private Sub Command1_Click()

IfText1．Text=””Then

MsgBox”请输入半径!”

ElseIf Not IsNumerie(【 】)Then

MsgBox“请输入数值数据!”．

Else

r=Val(【 】)

Form2．Show

【 】．Print”圆的面积是”&3．14”r*r

End If

End Sub

在新建一个VB工程时，将新建窗体的Name属性设置为TheFirst，则默认的窗体文件名为（ ）。

A. forml．frm

B. 工程1．frm

C. TheFirst．frm

D. Forml．vbp

新建一工程，将其窗体的Name属性设置MyFirst，则默认的窗体文件名为( )。

A．Forml.frm

B．工程1.frm

C．MyFirst.frm

D．Forml.vbp

以下能在窗体Forml的标题栏中显示“Visual Basic窗体”的语句是( )。

A．Forml.Namer="VisualBasic窗体"

B．Forml.Title="VisualBasic窗体"

C．Forml.Caption="VisualBasic窗体"

D．Forml.Text="VisualBasic窗体"

启动窗体时，系统首先执行的事件过程是（ ）。

A.Load

B.Click

C.Unload

D.GotFocus

设工程中有2个窗体：Forml、Form2，Forml为启动窗体。Form2中有菜单，其结构如表。要求在程序运行时，在Forml的文本框Tcxtl中输入口令并按同车键(回车键的ASCII码为13)后，隐藏Forml，显示Form2。若口令为“Teacher”，所有菜单项都可见；否则看不到“成绩录入”菜单项。为此．某人在Form1窗体文件中编写如下程序：

Private Sub Text1_KeyPress(KeyAscii As Integer)

IfKeyAscii=13 Then

If Text1．Text=“Teacher”Then

Form2．input．Visible=True

Else

Form2．input．Visible=False

End if

End ff

Forml．Hide

Form2．Show

End Sub

菜单结构

程序运行时发现刚输入口令时就隐藏了Forml，显示了Form2，程序需要修改。下面修改方案中正确的是

A．把Forml中Textl文本框及相关程序放到Form2窗体中

B．把Forml．Hide、Form2．Show两行移到2个End If之间

C．把IfKeyAscii=13 Then改为IfKey Ascii=“Teacher”Then

D．把2个Form2．input．Visible中的“Form2．”删去

A. Load事件过程

B. Click事件过程

C. Unload事件过程

D. GotFocus事件过程

A、作为启动对象的Main子过程只能放在窗体模块内

B、如果启动对象是Main子过程，则程序启动时不加载任何窗体，以后由该过程根据不同情况决定是否加载窗体或加载哪一个窗体

C、如果没有启动窗体，则程序不能执行

D、以上都不对

在C:\Pic文件夹中有一个图形文件，名为Welcome. gif。为了将该图形装入窗体 Form1，应使用的语句为 ( )

A．Forml. Caption＝"WELCOME. gif"

B．Forml. Picture＝C:\Pic\Welcome. gif

C．Forml. Picture="C:\Pic\Welcome. gif"

D．Forml. Picture=LoadPieture("C:\Pic\Welcome. gif")

窗体Forml上有一个名称为Commandl的命令按钮，以下对应窗体单击事件的事件过程是

A．Private Sub Forml_Click() … End Sub

B．Private Sub Form_Click() … End Sub

C．Private Sub Commandl_Click() … End Sub

D．Private Sub Command_Click() … End Sub

窗体Forml上有一个名称为Commandl的命令按钮，以下对应窗体单击事件的事件过程是（ ）。

A.控制流

B.数据流

C.模块调用

D.事件驱动

若窗体Forml中有一个命令按钮Cmdl，则窗体和命令按钮的Click事件过程名分别为（ ）。

A.Form_ClickCommandl_Click

B.Fzml_ClickCommamdl_Click

C.Form_ClickCmdl_Click

D.Frml_ClickCmdl_lAck

窗体Forml上有一个名称为Commandl的命令按钮，以下对应窗体单击事件的事件过程是（ ）。

设在窗体Forml上有一个列表框Listl，其中有若干个项目。要求单击列表框中某一项时，把该项显示在窗体上，正确的事件过程是。 A．Private Sub Listl_Click B．Private Sub Forml_Click Print Listl．Text Print Listl．Text End Sub End Sub C．Private Sub Listl_Click D．Private Sub Forml_Click Print Forml．Text Listl．Print Listl．Text End Sub End Sub

以下关于窗体的描述中，错误的是

A．执行UnLoadForml语句后，窗体Forml消失，但仍在内存中

B．窗体的Load事件在加载窗体时发生

C．当窗体的Enabled属性为False时，通过鼠标和键盘对窗体的操作都被禁止

D．窗体的Height、Width属性用于设置窗体的高和宽