D)窗体(Form)可以作为过程的参数(25)在窗体上画一个名称为 Command1 的命令按钮,再画两个名称分别为 Label1、Label2 的标签,然后编写如下程序代码:Private X As IntegerPrivate Sub Command1_Click( )X=5: Y=3Call proc(X, Y)Label1.Caption=XLabel2.Caption=YEnd SubPrivate Sub proc(a As Integer, ByVal b As Integer)X=a*aY=b+bEnd Sub程序运行后,单击命令按钮,则两个标签中显示的内容分别是( )。A)25 和 3B)5 和 3C)25 和 6D)5 和 6
D)窗体(Form)可以作为过程的参数
(25)在窗体上画一个名称为 Command1 的命令按钮,再画两个名称分别为 Label1、Label2 的标签,然后
编写如下程序代码:
Private X As Integer
Private Sub Command1_Click( )
X=5: Y=3
Call proc(X, Y)
Label1.Caption=X
Label2.Caption=Y
End Sub
Private Sub proc(a As Integer, ByVal b As Integer)
X=a*a
Y=b+b
End Sub
程序运行后,单击命令按钮,则两个标签中显示的内容分别是( )。
A)25 和 3
B)5 和 3
C)25 和 6
D)5 和 6
相关考题:
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() a S="VisualBasic" Print String(3, a$) End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是______。A.VVVB.VisC.sicD.11
设工程文件包含两个窗体文件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 5B.0 5C.0 0D.程序有错
新建一个工程,内有两个窗体,名称分别为Form1、Form2,窗体Form1上有一个命令按钮Command1,单击该按钮,Form1窗体消失,显示Form2窗体,程序如下,请填空。Private Sub Command1_Click()Form1.HideForm2.______End Sub
假定建立了一个工程,该工程包括两个窗体,其名称分别为Form1和Form2,启动窗体为Form1。在Form1上画一个命令按钮Command1,程序运行后,要求当单击该命令按钮时,Form1窗体消失,显示Form2,请在空白处将程序补充完整。Private Sub Command1_Click()______form2.______End Sub
在窗体上画两个名称分别为Label1和Label2的标签,再画一个名称为Command1的命令按钮,然后编写如下事件过程:运行上面的程序,单击命令按钮.其输出结果是A.8 9B.8 18C.64 9D.64 18
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Privme Sub Command1_Click( ) a$="VisualBasic" Print String(3,a$) End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是A.VVVB.VisC.sicD.11
在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:Private Sub Command1_Click()a = 12345Print Format$(a, "000.00")End Sub程序运行后,单击命令按钮,窗体上显示的是( )。A.123.45B.12345.00C.12345D.00123.45
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()x = -5If Sgn(x) Then y = Sgn(x ^ 2)Else y = Sgn(x)End IfPrint yEnd Sub程序运行后,单击命令按钮,窗体上显示的是( )。A.-5B.25C.1D.-1