运行下列程序，窗体中的显示结果是：（ ）。OptionCompare DatabaseDim X AsIntegerPrivateSub Form_Loadx=3EndSubPrivate Sub Commandll_clickStatic aAs IntegerDim b AsIntegerb=x^2funl x，bfunl x．bMsgBox”x=‘’xEnd SubSubfunl(ByRef Y As Integer，ByVal z AS Integer)y=y+zz=y-zEnd SubA.x=3B.x=2C.x=21D.x=12
运行下列程序，窗体中的显示结果是：（ ）。
OptionCompare Database
Dim X AsInteger
PrivateSub Form_Load
x=3
EndSubPrivate Sub Commandll_click
Static aAs Integer
Dim b AsInteger
b=x^2
funl x，b
funl x．b
MsgBox”x=‘’&x
End Sub
Subfunl(ByRef Y As Integer，ByVal z AS Integer)
y=y+z
z=y-z
End Sub
A.x=3
B.x=2
C.x=21
D.x=12
相关考题：
（ 18 ）在程序运行时，下面的叙述中正确的是A ）用鼠标右键单击窗体中无控件的部分，会执行窗体的 Form_Load 事件过程B ）用鼠标左键单击窗体的标题栏，会执行窗体的 Form_Click 事件过程C ）只装入而不显示窗体，也会执行窗体的 Form_Load 事件过程D ）装入窗体后，每次显示该窗体时，都会执行窗体的 Form_Click 事件过程
下面程序运行后，窗体(Form1)中输出的结果是( )Privatesubform_load()form1.autoredraw=truex=3:y=5Printx;yendsubA.TrueTrueB.35C.窗体无显示D.x=3y=5
在考生文件夹中有一个工程文件execise55.vbp，它包含两个名称分别为Form1和Form2的窗体，Form1和Form2窗体上建立了标题分别为Cmd1和Crud2的按钮。请先把Form1上按钮的标题改为End，把Form2上按钮的标题改为Display，并将Form2设为启动窗体，将Form1设为不显示。该程序实现的功能是：在程序运行时显示Form2窗体，单击Form2上的Display按钮，则显示Form1窗体；若单击Form1上的End按钮，则关闭Form1和Form2，并结束程序运行。注意：请去掉程序中的注释符“'”，把程序中的问号“?”改为正确的内容，使其实现上述功能，但不得修改程序的其他部分。最后，按原文件名并在原文件夹中保存修改后的文件。正确程序运行后的界面如下图所示。
运行下列程序，窗体中的显示结果是：x= 。Option Compare DatabaseDim x As IntegerPrivate Sub Form_Load（）x=3End SubPrivate Sub Commandll_ Click()Static a As IntegerDim b As Integerb=x^2funl x，bfunl x，bMsgBox〝x=〞xEnd SubSub funl（ByRef y As Integer，ByVal z As nteger）y=y+zz=y-zEnd Sub
在程序运行时，下面的叙述中正确的是（ ）。A.用鼠标右键单击窗体中任何无控件部分，会执行窗体的Form—Load事件过程B.用鼠标左键单击窗体的标题栏，会执行窗体的Form—Click事件过程C.只装入而不显示窗体，也会执行窗体的Form—Load事件过程D.装入窗体后，每次显示该窗体时，都会执行窗体的Form—Click事件过程
运行下列程序，输入数据8、9、3、0后，窗体中显示结果是( )。Prirate Sub．Form_click()Dim sum As Integer,m As Integersum=0Dom=inputBox(“输入m”)sum=sum+mLoop Until m=0MsgBox sumEnd SubA．0B．17C．20D．21
运行下列程序：Private Sub Form_Click( )a$ = 2b$ = 1Call abcd(a, b, c$, d$)Print c; dEnd SubPrivate Sub abcd(x$, y$, z$, s$)z = x + ys = x - yEnd Sub单击窗体后，则在窗体上显示的结果是( )。A.3 1B.1 3C.211D.显示出错信息
运行下列程序:Private Sub Form_Click( )Dim y As Integer, x As IntegerDo Until x > 20x 运行下列程序：Private Sub Form_Click( )Dim y As Integer, x As IntegerDo Until x 20x = x + 10y = y + xIf x 20 Then Exit DoLoopPrint x, yEnd Sub单击窗体后，则在窗体上显示的结果是( )。A.10 20B.30 60C.10 30D.20 60
在多重窗体程序中，假设Form1为启动窗体，若要显示Form2窗体，应使用语句Form2.Show（)。