首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下列程序运行后,单击窗体,在窗体上显示:1,1+2,1+2+3,1+2+3+4,1+2+3+4+5的和。请在横线处填写适当的内容,将程序补充完整。 Private Sub Form_Click() Dim i As Integer.tt A
下列程序运行后,单击窗体,在窗体上显示:1,1+2,1+2+3,1+2+3+4,1+2+3+4+5的和。请在横线处填写适当的内容,将程序补充完整。 Private Sub Form_Click() Dim i As Integer.tt A
admin
2012-09-07
17
问题
下列程序运行后,单击窗体,在窗体上显示:1,1+2,1+2+3,1+2+3+4,1+2+3+4+5的和。请在横线处填写适当的内容,将程序补充完整。
Private Sub Form_Click()
Dim i As Integer.tt As Integer
For i=1 To 5
tt=Sum(i):Print“tt=”;tt,
Next i
End Sub
Private Function Sum(_____________)
_____________
j=j+n
Sum=j
End Function
选项
答案
ByVal nAs Integer Staticj As Integer
解析
本题考查参数的传递和静态局部变量。Sum函数在窗体单击事件中调用5次并用来求和,因此每一次求和结果应当保留,所以借助静态变量实现。同时要求传递的形参变化不应影响到实参,因此采用传值调用。
转载请注明原文地址:https://jikaoti.com/ti/TiO0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有下面一个程序段,从文本框中输入数据,如果该数据满足条件,除以4余1,除以5余2则输出,否则,将焦点定位在文本框中,并清除文本框的内容。 Private Sub Command1_Click( ) x=Val(Text1.Text) If【
在属性窗口中设置何属性,可以把指定的图形放入当前对象中?
完全不考虑程序的内部结构和内部特征,而只是根据程序功能导出测试用例的测试方法是
下面程序是由鼠标事件在窗体上画图,如果按下鼠标将可以画图,双击窗体可以清除所画图形。补充完整下面的程序。首先在窗体层定义如下变量:DimPaintStartAsBoolean编写如下事件过程:PrivateSubForm_Load()
下列程序的执行结果为 PrivateSubCommand1_Click() Dims1AsString,s2AsString S1;="abcdef" CallInvert(s1,s2) Prints2
在窗体上画一个命令按钮,然后编写如下程序: PrivateSubComrnand3_Click() Cop2 Cop3 Cop4 EndSub SubCop(aAsInteger) Staticx
设置复选框中或单选按钮的标题对齐方式的属性是_______。
窗体上画一个文本框(其名称为Text1)和一个标签(其名称为Labell)。要求程序运行后,如果在文本框中输入字符,则立即在标签中显示相同的内容。以下可以实现上述操作的事件过程是:_______。
执行下列语句后,显示输入对话框,此时如果单击“确定”按钮,则变量strInput的内容是:_______。atrInput=InputBox("请输入字符串","字符串对话框","字符串")
数据模型按不同应用层次分成3种类型,它们是概念数据模型、【】和物理数据模型。
随机试题
阵发性室上性心动过速发作时,用刺激迷走神经方法治疗,下列哪项叙述不正确
Todaythepublic______aboutthewaytheenvironmentisdamaged.
文献综述的目的是
下列有关非竞争性抑制作用的叙述正确的是
长期大量使用阿司匹林可导致脑出血所采用的监测方法是()
同业拆借资金主要用于商业银行的()。
仿照下面的句子续写一句话。假如我是一个诗人,我就要用动情的诗篇,来讴歌大海的波澜壮阔;_________________,_________________,_________________。
某汽车企业在传统车型的基础上新增了自动上锁装置,能保证汽车和车内财产的安全性。因此,这款自动上锁车型的销售量将大大高于传统车型。以下哪项如果为真,最能对上述推理提出质疑?
下列哪些激素的受体属于G蛋白偶联受体
GlobalWarmingControversyVocabularyandExpressionscontroversyemissionsnon-committalprojectionscur
最新回复
(
0
)