一个工程中包含两个名称分别为Forml、Form2的窗体,一个名称为mdlFunc的标准模块。假定在Forml、Form2和md1Func中分别建立了自定义过程,其定义格式为: Form1中定义的过程: Private Sub frmFunctionl() ... End Sub Form2中定义的过程: Public Sub frmFunction2() ... End Sub md1Func中定义的过程: Public Sub mdlFunction() ... End Sub 在调用上述过程的程序中,如果不指明窗体或模块的名称,则以下叙述中正确的是
A.上述三个过程都可以在工程中的任何窗体或模块中被调用
B.frmFunction2和mdlFunction过程能够在工程中各个窗体或模块中被调用
C.上述三个过程都只能在各自被定义的模块中调用
D.只有mdlFunction过程能够被工程中各个窗体或模块调用
第1题:
A、发生一个运行错误
B、发生一个编译错误
C、在所有的初始化代码运行后,Form1是活动窗体
D、在所有的初始化代码运行后,Form2是活动窗体
第2题:
一个工程中包含两个名称分别为Form1、Form2的窗体,一个名称为mdlFune的标准模块。假定在 Forml、Form2和mdlFunc中分别建立了自定义过程,其定义格式为: Forml中定义的过程: Privme Sub frmFunction1( ) …… End Sub Form2中定义的过程: Public Sub frmFunction2( ) End Sub mdlFunc 中定义的过程: PubHc Sub mdl Function( ) End Sub 在调用上述过程的程序中,如果不指明窗体或模块的名称,则以下叙述中正确的是
A.上述三个过程都可以在工程中的任何窗体或模块中被调用
B.frmFunction2和mdlFunction过程能够在工程中各个窗体或模块中被调用
C.上述三个过程都只能在各自被定义的模块中调用
D.只有mdlFunction过程能够被工程中各个窗体或模块调用
第3题:
一个工程中包含两个名称分别为Form1、Fort2的窗体,一个名称为mdlFunc的标准模块。假定在 Form1、Form2和mdlFune中分别建立了自定义过程,其定义格式为: Form1中定义的过程; Private Sub frmFunctionl() ... End Sub Form2中定义的过程: Public Sub frmFunction2() ... End Sub mdlFunc中定义的过程: Public SubmdlFunction() ... End Sub 在调用上述过程的程序中,如果不指明窗体或模块的名称,则以下叙述中正确的是 ______。
A.上述3个过程都可以在工程中的任何窗体或模块中被调用
B.frmFunction2和mdlFunction过程能够在工程中各个窗体或模块中被调用
C.上述3个过程都只能在各自被定义的模块中调用
D.只有mdlFunction过程能够被工程中各个窗体或模块调用
第4题:
一个工程中包含两个名称分别为Form1、Form2的窗体、一个名称为Func的标准模块。假定笔Form1、Form2和Func中分别建立了自定义过程,其定义格式为:End Sub 在调用上述过程的程序中,如果不指明窗体或模块的名称,则以下叙述中正确的是( )。
A. 上述3个过程都可以在工程中的任何窗体或模块中被调用
B. Fun1和Fun2过程能够在工程中各个窗体或模块中被调用
C. 上述3个过程都只能在各自被定义的模块中调用
D. 只在Fun3过程能够被工程中各窗体或模块调用
第5题:
设一个工程由两个窗体组成,其名称分别为Form1和Form2,在Form1上有一个名称为 Command1的命令按钮。窗体Form1的程序代码如下: Private Sub Command1_Click() Dim a As Integer a=10 Call g(Form2,A)End Sub Private Sub g(f As Form, x As Integer) y=IIf(x>10, 100,-100) f.Show f.Caption =y End Sub 运行以上的程序,正确的结果是
A.Forml的Caption属性值为100
B.Form2的Caption属性值为-100
C.Forml的Caption属性值为-100
D.Form2的Caption属性值为100
第6题:
工程中有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
第7题:
设工程文件包含两个窗体文件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.程序有错
第8题:
设工程中有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.”删去
第9题:
一个工程中包含两个名称分别为Form1、Form2的窗体,一个名称为mdlFunc的标准模块。假定在Form1、Form2和mdlFunc中分别建立了自定义过程,其定义格式为: Form1中定义的过程: Private Sub frmFunctionl() End Sub Form2中定义的过程: Public Sub fimFunction2() End Sub mdlFunc中定义的过程: Public Sub
A.上述三个过程都可以在工程中的任何窗体或模块中被调用
B.frmFunction2和mdlFunction过程能够在工程中各个窗体或模块中被调用
C.上述三个过程都只能在各自被定义的模块中调用
D.只有mdlFunction过程能够被工程中各个窗体或模块调用