首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command1_Click() Dim n As Integer,t As Long Static s As Integer t=1 For n=
编写如下程序: Private Sub Command1_Click() Dim n As Integer,t As Long Static s As Integer t=1 For n=
admin
2015-08-28
40
问题
编写如下程序:
Private Sub Command1_Click()
Dim n As Integer,t As Long
Static s As Integer
t=1
For n=1 To 3
t=t*n
s=s+t
Next
Print s
End Sub
程序运行后,第二次单击命令按钮Command1时,输出结果为( )。
选项
A、6
B、9
C、12
D、18
答案
B
解析
Staic关键字定义的变量退出事件后变量值保持不变。For循环根据变量的初值进行计算。当第二次点击时,s的初值是第一次事件执行后的结果。选B。
转载请注明原文地址:https://kaotiyun.com/show/jILp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个命令按钮,名称为Command1。然后编写如下程序:PrivateSubCommand1_Click()DimaAsInteger,bAsInteger,cAsIntegerIfa=0
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,在文本框中输入以下字符串:MicrosoftVisualBasicProgramming然后编写如下事件过程:PrivateSubCommand
设有如下通用过程:PublicSubFun(a()AsInteger,xAsInteger)Fori=1To5x=x+a(i)NextEndSub在窗体上画一个名称为Text1的文本框和
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下程序:PrivateSubCommand1_Click()Dimx,Y,zAsIntegerx=5y=7
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimnumAgIntegernum=1DoUntilnum>6
在窗体上面画一个名称为TxtA的文本框,然后编写如下的事件过程:PrivateSubTxtA___KeyPress(Keyasciiasinteger)......EndSub若焦点位于文本框中,则能够触发K
栈和队列的共同点是______。
只能用来显示文本信息的控件是()。
下列关于线性链表的描述中正确的是()。
用链表表示线性表的优点是______。
随机试题
血型
一个心动周期中,持续时间最长的时期是
保教结合的内涵是什么?
小明是班上的“调皮大王”,他上课经常做出诸如往前排同学后背上贴纸条等恶作剧,所以经常被老师批评,他的父亲对他非打即骂。九岁那年,小明转学遇到新的班主任,父亲对班主任说:“这孩子太调皮了,请严加管教。”班主任好奇地走近小明,从生活上关心他,学习上帮助他,并尝
战国时期的风诡云谲之中,士争雄、国争霸的社会场景在历史上留下的画卷之繁复、之错综、之精彩、之生动,的确是罕见的。而提及战国,自然要提及名噪一时的乱世枭雄——“四君子”:齐之孟尝、赵之平原、魏之信陵、楚之春申。他们广养门客,苦心经营,倡合纵,拒强秦,确是做了
教师:学生与()在内在逻辑关系上最为相似。
①当地球撞进尘埃带时,从地球上看,是短时间内无数尘埃以极高的速度划破大气层下落②因此,流星雨实际上是彗星留下的无数尘埃形成的③进入大气层的尘埃被大气加热,发出明亮的光④彗星释放出的尘埃,并非顷刻扩散到宇宙空间,消失得无影无踪,
Thisdecisionwillgiverenewed________totheeconomicregenerationofeastLondon.
设Q(x,y)在平面xOy上具有一阶连续的偏导数,且∫L2xydx+Q(x,y)dy与路径无关,且对任意的t有∫(0,0)(t,1)2xydx+Q(x,y)dy=∫(0,0)(1,t)2xydx+Q(x,y)dy,求Q(x,y).
A、BananaswereamongthefirstplantstobedomesticatedinUK.B、TheCavendishbananawasactuallyoriginatedinSouthChina.C
最新回复
(
0
)