Form1中定义的过程:
PublicSubFun1()
…
EndSub
Func中定义的过程:
SubFun2()
…
EndSub
若要在窗体Form2中调用Form1和Func中分别建立的自定义过程,则调用格式正确的是( )。
举一反三
- 一个工程中包含两个名称分别为Form1、Form2的窗体。假定在Form1和Form2中分别建立了自定义过程,其定义格式为:Form1中定义的过程:PrivateSubFun1()……EndSubForm2中定义的过程:PrivateSubFun2()……EndSub若要在窗体Form2调用Form1中建立的自定义过程Fun1,则调用格式正确的是() A: Fun1() B: CallForm1.Fun1() C: Form1.Fun2() D: CallFun1()
- 一个工程中包含两个名称分别为Form1和Form2的窗体,一个名称为mdlfunc的标准模块。假定Form1、Form2和mdlfunc中分别建立了自定义过程,其定义格式为: Form1中定义的过程: PrivatesubfrmFunction1() ………… EndSub Form2中定义的过程: PrivatesubfrmFunction2() ………… EndSub Md1func中定义的过程: Privatesubmd1Function() ………… EndSub 在调用上述过程的程序时,若不指明窗体或模块名称,则以下叙述中正确的是()。
- 一个工程中包含两个名称分别为Form1、Form2的窗体,一个名称为mdlFunc的标准模块。假定在Form1、Form2和mdlFunc中分别建立了自定义过程,其定义格式为: Form1中定义的过程: PrivateSubfrmfunction1() …………………………. EndSub Form2中定义的过程: PublicSubfrmfunction2() …………………………. EndSub mdlFunc中定义的过程: PublicSubmdlFunction() …………………………. EndSub 在调用上述过程的程序中,如果不指明窗体或模块的名称,则以下叙述中正确的是。
- 一个工程中包含两个窗体,分别名为form1、form2,还有一个名为mdlfunc的标准模块。假定在form1、form2和mklfunc中分别建立了自定义过程,其定义格式为: form1中定义的过程 PrivateSubfrmFunction1() …… Endsub Form2中定义的过程 PublicSubfrmFunction2() …… Endsub Mdlfunc中定义的过程为 PublicSubmdlFunction() …… Endsub 在调用上述过程的程序中,如果不指明窗体或模块的名称,只有mdlFunction可以被任何工程中的任何窗体或模块调用。
- 当双击窗体Form1时,要将窗体Form1隐藏起来、将窗体Form2以模式方式显示出来的事件过程,正确的是 A: Private Sub Form _ Db1Click( )Forml.HideForm2.Show 0End Sub B: Private Sub Form _ Db1Click( )Form1.HideForm 2.Show 1End Sub C: Private Sub Form _ Click( )Form l.HideForm 2.ShowEnd Sub D: Private Sub Form _ Dbl Click( )Form l.Enabled=FalseForm 2.Enabled=TrueEnd Sub
内容
- 0
在窗体Form1中用“Public Sub Fun(x As Integer, y As Single)”定义过程Fun,在窗体Form2的某事件过程中定义了变量I和J均为Integer,若要在此过程中调用Form1中的Fun过程,则下列语句中正确的是 。
- 1
假定建立了一个工程,该工程包括两个窗体,其名称(Name属性)分别为Form1和Form2,启动窗体为Form1。在Form1上画一个命令按钮Command1,程序运行后,要求当单击该命令按钮时,Form1窗体消失,显示窗体Form2,请将下面的程序补充完整。
- 2
在一个工程中有Form1和Form2两个窗体,Form1是启动窗体,在Form1的Load事件过程中有语句Form2.Show,则程序启动后______。 A: 发生一个运行时错误 B: 发生一个编译时错误 C: Form1是活动窗体 D: Form2是活动窗体
- 3
一个工程中包含两个名称分别为Form1和Form2的窗体,程序运行后,如果单击Form1,则隐藏Form1且显示Form2。下列可以执行上述操作的事件过程是 A: PrivateSubForm_Click()Form1.HideForm2.ShowEndSub B: PrivateSubForm1_Cliek()Form1.HideForm2.ShowEndSub C: PrivateSubForm_Click()Form1.Hide=TrueForm2.Show=TrueEndSub D: PrivateSubForm_Load()Form1.HideForm2.ShowEndSub
- 4
设有一个表单Form1,若要修改该表单Form1,正确的命令是 A: A) MODIFY COMMAND Form1 B: B) MODIFY FORM Form1 C: C) DO Form1 D) EDIT Form1