在窗体上有一个命令按钮Commandl,编写事件代码如下:Private SuB commandl_Click()Dim x As Integer,y As Integerx=12:y=32Call Proc(x,y)OeBug.Print x;yEnd SuBPuBlic SuB Proc(n As Integer,Byval m As Integer)n=n Mod 10m=m Mod 10End SuB打开窗体运行后,单击命令按钮,立即窗口上输出的结果是A.2 32B.12 3C.2 2D.12 32
在窗体上有一个命令按钮Commandl,编写事件代码如下:
Private SuB commandl_Click()
Dim x As Integer,y As Integer
x=12:y=32
Call Proc(x,y)
OeBug.Print x;y
End SuB
PuBlic SuB Proc(n As Integer,Byval m As Integer)
n=n Mod 10
m=m Mod 10
End SuB
打开窗体运行后,单击命令按钮,立即窗口上输出的结果是
A.2 32
B.12 3
C.2 2
D.12 32
相关考题:
( 31 )在窗体上有一个命令按钮 Commandl 和一个文本框 Textl ,编写事件代码如下:Private Sub Command1_Click()Dim i,j,xFor i = 1 To 20 step 2x = 0For j = To 20 step 3x = x + 1Next jNext iTextl.Value=Str(x)End Sub打开窗体运行后,单击命令按钮,文本框中显示的结果是A ) 1B ) 7C ) 17D ) 400
在窗体上有一个命令按钮Commandl和一个文本框Textl,编写事件代码如下:Private SuB cormmandl_Click()Dim i,j,xFor i=i To 20 step 2x=0For j=1 To 20 step 2x=x+1Next jNext iText1.Value=Str(x)End SuB打开窗体运行后,单击命令按钮,文本框中显示的结果是A.1B.7C.17D.400
在窗体上有一个命令按钮Commandl,编写事件代码如下:Private Sub Commandl Click( ) Dim X As Integer,Y As Integer x=12:y=32 Call Proc(x,Y) Debug.Print X;Y End Sub Public Sub proc(n As Integer,ByVal in As Integer) n=n Mod 10 m=m Mod 1O End Sub 打开窗体运行后,单击命令按钮,立即窗口上输出的结果是( )。A.232B.123C.22D.1232
在窗体上有一个命令按钮Commandl和一个文本框Textl,编写事件代码如下: Private Sub Commandl一Click( )Dim i,j,X For i=1 TO 20 step 2 X=0 For j=i TO 20 step 3 X=X+1 Next j Next i.Textl.Value=Str(x) End Sub 打开窗体运行后,单击命令按钮,文本框中显示的结果是( )。A.1B.7C.17D.400
在窗体中添加一个名称为Commandl的命令按钮,然后编写如下事件代码。 Public x As IntegerPrivate SUb Commandl_Click( ) x=10Call slCall s2MsgBoxXEndSubPrivate Sub sl( ) x=x+20EndSubPrivate Sub s20Dim xAs IntegerX=x+20EndSub窗体打开运行后,单击命令按钮,则消息框的输出结果是( )。A.10B.30C.40D.50
在窗体上有~个命令按钮Commandl和一个文本框Textl,编写事件代码如下 Private Sub Commandl_Click( ) Dim i,j,XFori=I T0 20 step 2x=OForj=i T0 20 step 3x=x+lNextjNextiTextl.Value=Str(x)End Sub打开窗体运行后,单击命令按钮,文本框中显示的结果是( )。【考点4 VBA流程控制语句】A.1B.7C.17D.400
在窗体上画一个命令按钮,名称为Commandl,然后编写如下事件过程: Private Sub Commandl_Click() Dim() a=Array(”机床”,”车床”,”钻床”,”轴承”)Printa(2)EndSub程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。A.机床B.车床C.钻床D.轴承