首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有1个名称为Command1的命令按钮,事件过程及函数过程如下: Private Sub Command1_Click() Dim p As Integer p=m(1)+m(2)+m(3) P
窗体上有1个名称为Command1的命令按钮,事件过程及函数过程如下: Private Sub Command1_Click() Dim p As Integer p=m(1)+m(2)+m(3) P
admin
2019-06-11
57
问题
窗体上有1个名称为Command1的命令按钮,事件过程及函数过程如下:
Private Sub Command1_Click()
Dim p As Integer
p=m(1)+m(2)+m(3)
Print p
End Sub
Private Function m(n As Integer)As Integer
Static s As Integer
For i=1 To n
S=s+1
Next
m=S
End Function
运行程序,第2次单击命令按钮Command1时的输出结果为( )。
选项
A、6
B、10
C、16
D、28
答案
D
解析
在过程m中,s被定义为静态变量,因此它的值只在第一次调用过程时初始化,以后再调用都不再初始化,而是保留之前的值。m过程的功能是根据参数值累加,因此第1次单击时,m(1)+m(2)+m(3)=1+3+6=10,此时变量s的值,即过程m的值为6,第2次单击时,m(1)+m(2)+m(3)=7+9+12=28。因此答案为D。
转载请注明原文地址:https://kaotiyun.com/show/ryUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设窗体中有一个文本框Text1,若在程序中执行了Text1.SetFocus,则触发
设窗体上有1个名称为HScroll1的水平滚动条,其Max、Min属性分别设置为100、1;有2个名称分别为Option1、Option2的单选按钮,其标题分别为“30”、“50”;还有下面程序代码:PrivateSubOption1_Click()
以下程序的功能是随机产生10个两位的整数:OptionBase1PrivateSubCommand1_Click()Dima(10)AsInteger,iAsIntegerRandomizeFori=1To10a(i)=I
窗体上有一个名称为Commandl的命令按钮,单击该按钮时所实现的功能是产生10个随机整数,然后从键盘输入一个整数,查找该数在数组中的位置。若找到,输出该数的位置;若没有找到,给出相应的提示。该命令按钮的单击事件过程如下:PrivateSubComm
设有如下通用过程:PublicFunctionFun(xStrAsString)AsStringDimtStrAsString.strLAsIntegertStr=""strL=Len(xStr)i=1DoWhilei<=
下列关于数据库设计的叙述中,正确的是
设有下列语句:x=5Ifx>0Theny=1y=5程序运行后,则下列叙述中正确的是()。
表达式12/2\4的值是
设a=2,b=3,c=4,d=5,下列表达式的值是()。3>2*bOra=cAndb<>cOrb<>a+c
随机试题
社会主义民族问题的实质是( )
70岁,男性患者,表情呆板,动作缓慢,右手不自主震颤,长期服用左旋多巴;同时患有前列腺肥大。近半年出现病情波动,症状多于服药前加重
患者女性,31岁。自觉疲倦,乏力,食欲不振近2年。平时月经量多,生育1胎,小孩1岁半,自己哺乳喂养。无其他疾病史。体检:发现皮肤、唇黏膜、甲床苍白,心率100/rain。RBC3.15×1012/L,Hb75g/L,MCV69fl网织红细胞1.8%,白细胞
下列各项中,哪种心脏瓣膜病最易引起晕厥()
扩张型心肌病临床表现特点包括下列哪几项( )。
客户应当将保证金存入期货公司通过期货保证金安全存管监控机构网站披露的期货保证金账户。()
下列不属于商业银行开展理财业务应当满足的管理要求的是()。
个人住房贷款期限在1年以上的,常采用的还款方式为()。
2011年1月,甲、乙、丙、丁、戊共同出资设立A有限合伙企业(简称A企业),从事产业投资活动。其中,甲、乙、丙为普通合伙人,丁、戊为有限合伙人。丙负责执行合伙事务。2011年2月,丙请丁物色一家会计师事务所,以承办本企业的审计业务。丁在合伙人会议上提议聘请
设二维连续型随机变量(X,Y)在区域D={(x,y)|0≤y≤x≤3一y,y≤1}上服从均匀分布,求边缘密度fX(x)及在X=x条件下,关于Y的条件概率密度.
最新回复
(
0
)