更多"假定一个工程由一个窗体文件Form1和两个标准模块文件Model1及M"的相关试题:
[单项选择]假定一个工程由一个窗体文件Form1和两个标准模块文件Model1及Model2组成。
Model1代码如下：
Public x As Integer
Public y As Integer
Sub S1（ ）
x=1
S2
End Sub
Sub S2（ ）
y=10
Form1. Show
End Sub
Model2的代码如下：
Sub Main（ ）
S1
End Sub
其中Sub Main被设置为启动过程。程序运行后，各模块的执行顺序是( )。
A. Forml→Model1→Model2
B. Model1→Model2→Form1
C. Model2→Model1→Form1
D. Model2→Form1→Model1
[单项选择]假定一个工程由一个窗体文件Form1和两个标准模块文件Model1及ModeL2组成。
Model1代码如下：
Public x As Integer
Public y As Integer
SubS1( )
x=1
S2
End Sub
Sub S2( )
y=10
Form1.Show
End Sub
Model2的代码如下：
Sub Main( )
S1
End Sub
其中Sub Main被设置为启动过程。程序运行后，各模块的执行顺序是
A. Form1→4Modell→Model2
B. Model1→Model2→Form1
C. Model2→4Modell→4Form1
D. Model2→Form1→Model1
[单项选择]假定一个工程由一个窗体文件Form1和两个标准模块文件Model1及Model2组成。 Model1代码如下： Public x As Integer Public y As Integer Sub S1( ) x=1 S2 End Sub Sub S2( ) y=10 Form1．Show End Sub Model2的代码如下： Sub Main( ) S1 End Sub其中Sub Main被设置为启动过程。程序运行后，各模块的执行顺序是
A. Form1→Model1→Model2
B. Model1→Model2→Form1
C. Model2→Model1→Form1
D. Model2→Form1→Model1
[单项选择]假定一个工程由一个窗体文件Forml和两个标准模块文件Model1及Model2组成。
Model1代码如下：
Public x As Integer
Public y As Integer
Sub S1（ ）
x=1
S2
End Sub
Sub S20
y=10
Form1.Show
End Sub
Model2的代码如下：
Sub Main（ ）
S1
End Sub
其中Sub Main被设置为启动过程。程序运行后，各模块的执行顺序是( )。
A. Form1→MOdel1→Model2
B. MOdel1→Model2→Form1
C. Model2→Model1→Form1
D. Model2→Form1→Model1
[单项选择]设工程文件包含两个窗体文件Form1. frm、Form2. frm及一个标准模块文件Module1. bas。两个窗体上分别只有一个名称为Command1的命令按钮。
Form1的代码如下：
Public x As Integer
Private Sub Form_Load( )
x=1
y=5
End Sub
Private Sub Command1_Click( )
Form2. Show
End Sub
Private Sub Command1_Cliek( )
Print Form1. x, y
End Sub
Module1的代码如下：
Public y As Integer
运行以上程序，单击Form1的命令按钮Command1，则显示Form2；再单击Form2上的命令按钮Command1，则窗体上显示的是( )。
A. 1 5
B. 0 5
C. 0 0 D) 程序有错
[填空题]假定建立了一个工程，该工程包括两个窗体，其名称分别为Form1和Form2，启动窗体为Form1。在Form1上画一个命令按钮Command1，程序运行后，要求当单击该命令按钮时，Form1窗体消失，显示Form2，请在空白处将程序补充完整。
Private Sub Command1_Click（ ）
______
form2．______
End Sub
[单项选择]
设工程文件包含两个窗体文件Form1.frm、Form2.frm及一个标准模块文件Module1.bas。两个窗体上分别只有一个名称为Command1的命令按钮。
Form1的代码如下：
Public x As Integer
Private Sub Form_Load（ ）
x=1
y=5
End Sub
Private Sub Command1_Chck（ ）
Form2.Show
End Sub
Form2的代码如下：
Private Sub Command1_Click（ ）
Print Form1.x，y
End Sub
Module1的代码如下：
Public y As Integer
运行以上程序，单击Form1的命令按钮Command1，则显示Form2；再单击Form2上的命令按钮Command1，则窗体上显示的是（）。
A. 1 5
B. 0 5
C. 0 0
D. 程序有错
[单项选择]设一个工程由两个窗体组成，其名称分别为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，000，-100)
f．Show
f．Caption=y
End Sub
运行以上程序，正确的结果是（ ）。
A. Form1的Capdon属性值为100
B. Form2的Caption属性值为-100
C. Form1的Caption属性值为-100
D. Form2的Capdon属性值为100
[单项选择]设一个工程由两个窗体组成，其名称分别为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,000, -100)
f. Show
f. Caption=y
End Sub
运行以上程序，正确的结果是( )。
A. Forml的Caption属性值为100
B. Form2的Caption属性值为-100
C. Form1的Caption属性值为-100
D. Form2的Caption属性值为100
