网友您好, 请在下方输入框内输入要搜索的题目:

题目内容 (请给出正确答案)

( 8 )窗体上有名称为 Command1 的命令按钮。事件过程及 2 个函数过程如下:

Private Sub Command1_Click()

Dim x As Integer,y As Integer,z

x=3

y=5

z=fy(y)

print fx(fx(x)),y

End Sub

Function fx(ByBal a As Integer)

a=a+a

fx=a

End Function

Function fy(ByRef a As Integer)

a=a+a

fy=a

End Function

运行程序,并单击命令按钮,则窗体上显示的 2 个值依次是 【 12 】 和 【 13 】 。


参考答案

更多 “ ( 8 )窗体上有名称为 Command1 的命令按钮。事件过程及 2 个函数过程如下:Private Sub Command1_Click()Dim x As Integer,y As Integer,zx=3y=5z=fy(y)print fx(fx(x)),yEnd SubFunction fx(ByBal a As Integer)a=a+afx=aEnd FunctionFunction fy(ByRef a As Integer)a=a+afy=aEnd Function运行程序,并单击命令按钮,则窗体上显示的 2 个值依次是 【 12 】 和 【 13 】 。 ” 相关考题
考题 ( 8 )在窗体上画一个名称为 “ Command1 ” 的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim a As Stringa = "123456789"For i = 1 To 5Print Space(6 - i); Mid$(a, 【 8 】 , 2 * i - 1)Next iEnd Sub程序运行后,单击命令按钮,窗体上的输出结果是5456345672345678123456789请填空。

考题 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub subl(ByVal x As Integer, ByVal y As Integer, ByVal z As Integer) z=x*x+y*y End Sub Private Sub Command1_Click() Dim a As Integer a=8 Call subl(1, 2,a) Print a End Sub 程序运行后,单击命令按钮,则窗体下显示的内容是______。A.8B.2C.5D.11

考题 在窗体上有1个名称为Commandl的命令按钮,并有如下事件过程和函数过程:Private Sub Commandl Click()Dim P As Integerp=m(1)+m(2)+m(3)Print PEnd SubPrivate Function m(n As Integer)As IntegerStatic s As IntegerFor k=1 To ns=s+lNextm=sEnd Function运行程序,单击命令按钮Commandl后的输出结果为

考题 窗体上有一个名称为Command1的命令按钮,其单击事件过程代码如下: Private Sub Command1 Click( ) Static x As Variant n=0 x=Array(1,2,3,4,5,6,7,8,9,10) While n=4 x(n)=x(n+5) Print x(n): n=n+1 Wend End Sub 运行程序,单击命令按钮Command1,窗体上显示的是( )。A.1 2 3 4 5B.6 7 8 9 10C.2 3 4 5 6D.6 2 3 4 5

考题 窗体Forml上有一个名称为Commandl的命令按钮,以下对应窗体单击事件的事件过程是( )。

考题 在窗体上有一个命令按钮Command1,通用过程fun和命令按钮的事件过程如下:Private Function fun(ByVal m As Integer)Ifm Mod2=0 Thenfun=2Elsefun=1End IfEnd FunctionPrivate Sub Command1_Click()Dim i As Integer,s As Integers=0For i=1 To 5s=s+fun(i)NextPrintsEnd Sub程序运行后,单击命令按钮,则窗体上输出( )。A.6B.7C.8D.9

考题 在窗体上有一个命令按钮Command1,通用过程fun和命令按钮的事件过程如下: Private Function fun(ByVal m As Integer) If m Mod 2 = 0 Then fun=2 Else fun=1 End If End Function Private Sub Command1_Cliek() Dim i As Integer, s As Integer s=0 For i=1 To 5 s=s+fun(i) Next Print s End Sub 程序运行后,单击命令按钮,则窗体上输出( )。A.6B.7C.8D.9

考题 (6)在窗体上有1个名称为Command 1的命令按钮,并有如下事件过程和函数过程:Private Sub Command 1_Click()Dim p As Integerp=m(1)+m(2)+m(3)Print pEnd SubPrivate Function m(n As Integer) As IntegerStatic s As IntegerFor k=1 To ns=s+1Nextm=sEnd Function运行程序,单击命令按钮Command 1的输出结果为【6】。

考题 设在名称为Myform的窗体上只有1个名称为C1的命令按钮,下面叙述中正确的是()。A.窗体的Click事件过程的过程名是Myform_ClickB.命令按钮的Click事件过程的过程名是Command_ClickC.命令按钮的Click事件过程的过程名是Command1_ClickD.命令按钮的Click事件过程的过程名是C1_Click