首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有如下过程,将两次调用过程proc的结果分别填于空【 】和【 】处。 Private Sub Command1_Click( ) Dim a As Integer Dim b As Integer
有如下过程,将两次调用过程proc的结果分别填于空【 】和【 】处。 Private Sub Command1_Click( ) Dim a As Integer Dim b As Integer
admin
2009-03-15
44
问题
有如下过程,将两次调用过程proc的结果分别填于空【 】和【 】处。
Private Sub Command1_Click( )
Dim a As Integer
Dim b As Integer
a=2
b=5
Call proc(a,B) 【 】
Call proc(A) 【 】
End Sub
Private Sub proc(x As Integer,Optional y)
Dim z As Integer
If IsMissing(y) Then
MsgBox ("没有提供可选参数")
Else
z=x*y
MsgBox ("乘积=" + Str(z))
End If
End Sub
选项
答案
乘积:10 ,没有提供可选参数
解析
本题中出现了可选参数,注意函数IsMissing()的使用。空[9]处的调用语句的结果是显示“乘积= 10”空[10]处调用的结果是显示“没有提供可选参数”。显然,第二次调用中,由于第二个可选参数默认,使 IsMissing()函数的值为True,才使程序流程进入Then子句的分支。
在没有指定可选参数的默认值时,可选参数的默认值被默认为变体类型的Empty值。当然,用户也可以提供可选参数的默认值,指定方式是在用Optional声明的形式参数后面用“=”号赋默认值。指定默认值后,即使没有提供可选参数,函数IsMissing()的值均为False,因为程序把指定的默认值默认为可选参数的值,因而没有丢失。将上例稍加修改,在可选参数y后为其指定默认值1。
Private Sub proc(x As Integer,Optional y=1)
空[10]处调用的结果变为显示“乘积=2”。显然,第二次调用中,虽然第二个可选参数默认,但将默认值1作为形式参数y的初值。从If语句分支的进入情况可以看出,该次调用中IsMissing()函数的值为False,才使程序流程进入Else子句的分支。
转载请注明原文地址:https://kaotiyun.com/show/UD1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
通过继承Thread创建线程,在主控程序中同时运行两个线程Thread1和Thread2。请在下面横线处填入代码完成此程序。publicclassThreadTest{publicstaticvoidmain(String
执行下列语句后,屏幕上显示i值为()inti=8;System.out.println(i>>=2);
在编写JavaApplet程序时,若需要对发生的事件作出响应和处理,一般需要在程序的开头写上()语句。
选择运算的结果关系同原关系具有【】的结构框架,投影运算的结果关系同原关系通常具有【】的结构框架。
在数据库应用系统设计的需求分析阶段,须经过收集资料、分析整理、【】、建立数据字典和用户确认等阶段。
下列组件不能添加进Frame主窗口的是
在面向对象方法中,类之间共享属性和操作的机制称为【】。
下列关系模型中,能使经运算后得到的新关系中属性个数多于原来关系中属性个数的是()
设有关系R(S,D,M),其函数依赖集F={S→M,D→M),则关系R至少满足()。
对鼠标点击按钮操作进行事件处理的接口是
随机试题
宫缩时子宫不硬,按压有凹陷,节律极性正常,属于
单纯左心衰竭的典型体征是
如果澄清发出的时间距投标截止时间不足()天,相应推后投标截止时间。
根据室内环境污染物控制的不同要求,下列民用建筑中,属于Ⅰ类建筑的有()。
诚信信息以()保存。
影响人的身心发展的因素是多种多样的,促进个体发展从潜在的可能状态转向现实状态的决定性因素是()。
【阿拉木图宣言】
Somespidershuntontheground,othersbuildwebstotraptheirfood,butthegrasswaterspidercatchesitspreybyrunningal
法的预测作用
Readthearticlebelowaboutchangesinworkingtime.Choosethebestsentencetofillineachofthegaps.Foreachgap8—12,m
最新回复
(
0
)