窗体上有一个名称为Co mmand1的命令按钮,其单击事件过程及有关函数过程如下:
Private Sub Co mmand1_Click()
Di mn As Integer
n =add(5,10)
Print n
End Sub
Function add(v1As Integer ,v2As Integer ,Optionalv3)As Integer
If Not Is Missi ng(v3)Then
add =v1+v2+v3
Else
add =v1+v2
End If
End Function
运行程序,单击命令按钮,以下叙述中正确的是( )。
发布于 2022-05-11 09:56:13
登录后免费查看答案
关注者
0
被浏览
15
1 个回答
推荐阅读
-
窗体上有一个名称为Command1的命令按钮,其单击事件过程及有关函数过程如下:Private Sub Command1 Click( )Dim n As Integern=add(5,10)Print nEnd SubFunction add(v1 As Integer,v2 As Integer,Optiona1 v3)As IntegerIf Not IsMissing(v3)Thenadd=v1+v2+v3Elseadd=v1+v2End IfEnd Function运行程序,单击命令按钮,以下叙述中正确的是( )。
2022-05-11 关注 0 浏览16 1答案
-
在窗体上画一个命令按钮(名称为Co mmand1),并编写下列代码:Function Funl (ByVal a As Integer ,b As Integer)As IntegerDi mt As Integer t =a-bb =t +aFunl =t +bEnd FunctionPrivate Sub Co mmand1_Click()Di mx As Integerx=10Print Funl(Funl(x,(Funl(x,x-1))),x-1)End Sub程序运行后,单击命令按钮,输出结果是( )。
2022-05-11 关注 0 浏览11 1答案
-
在窗体上有1个名称为Command1的命令按钮,并有如下事件过程和函数过程:Private Sub Command1_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运行程序,单击命令按钮Commandl后的输出结果为 ______ 。
2022-05-11 关注 0 浏览16 1答案
-
在窗体上画一个名称为Co mmand1的命令按钮,然后编写如下程序:Public Enumsa=4b =3End EnumPrivate Sub Co mmand1_Click()Di mx As Integerx=aIf x>=3ThenMsgBox "Pass !"End Sub运行程序,其结果是( )。
2022-05-11 关注 0 浏览8 1答案
-
设有如下通用过程:Public Function f(x As Integer)Di my As Integerx=20y =2f =x*yEnd Function在窗体上画一个名称为Co mmand1的命令按钮,然后编写如下事件过程:Private Sub Co mmand1_Click()Static x As Integerx=10y =5y =f(x)Print x;yEnd Sub程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。
2022-05-11 关注 0 浏览11 1答案
-
在窗体上画一个名称为Co mmand1的命令按钮,然后编写如下事件过程:Private Sub Co mmand1_Click()Di ma As Integer ,s As Integera=8s =1Dos =s +aa=a-1Loop While a <=0Print s ;aEnd Sub程序运行后,单击命令按钮,则窗体上显示的内容是( )。
2022-05-11 关注 0 浏览14 1答案
-
设工程文件包含两个窗体文件Form1.frm、Form2.frm 及一个标准模块文件Module1.bas ,两个窗体上分别只有一个名称Co mmand1的命令按钮。Form1的代码如下:Public X As IntegerPrivate Sub Form_load()x=1y =5End SubPrivate Sub Co mmand1_Click()Form2.ShowEnd SubForm2的代码如下:Private Sub Co mmand1_Click()Print Form1.x,yEnd SubModule1的代码如下:Public y As Integer运行以上程序,单击Form1的命令按钮Co mmand1,则显示Form2;再单击Form2上的命令按钮Co mmand1,则窗体上显示的是( )。
2022-05-11 关注 0 浏览13 1答案
-
窗体上有Co mmand1、Co mmand2两个命令按钮。现编写以下程序:Option Base 0Di ma()As Integer ,m As IntegerPrivate Sub Co mmand1Click()m=InputBox("请输入一个正整数")ReDi ma(m)End SubPrivate Sub Co mmand2Click()m=InputBox("请输入一个正整数")ReDi ma(m)End Sub运行程序时,单击Co mmand1后输入整数10,再单击Co mmand2后输入整数5,则数组a 中元素的个数是( )。
2022-05-11 关注 0 浏览9 1答案
-
在窗体上画一个名为Co mmand1的命令按钮,然后编写以下程序:Private Sub Co mmand1_Click()Di m M(10)As IntegerFor k =l To 10M(k)=12-kNextkx=8Print M(2+M(x))End Sub运行程序,单击命令按钮,在窗体上显示的是( )。
2022-05-11 关注 0 浏览19 1答案
-
窗体上有一个名称为Co mmand1的命令按钮,其单击事件过程如下:Private Sub Co mmand1_Click()Di ma,b(2,3)As Integera=Array(3,7,5,11,31,43,17,62,9,23,37,41)i =0Do While i <=UBound(a)For j=0To 2For k =0To 3b(j,k)=a(i)i =i +1Next kNext jLoopPrint b(2,2)End Sub运行程序,窗体上显示的是( )。
2022-05-11 关注 0 浏览13 1答案