首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮(Name属性为Commandl),然后编写如下事件过程: Private Sub Command l_Click( ) Dim a(10)As Interger,p(3)As Interger K=5 For i=1 To
在窗体上画一个命令按钮(Name属性为Commandl),然后编写如下事件过程: Private Sub Command l_Click( ) Dim a(10)As Interger,p(3)As Interger K=5 For i=1 To
admin
2020-02-27
27
问题
在窗体上画一个命令按钮(Name属性为Commandl),然后编写如下事件过程:
Private Sub Command l_Click( )
Dim a(10)As Interger,p(3)As Interger
K=5
For i=1 To 10
a(i)=i
Next i
For i=l To 3
p(i)=a(i*i)
Next i
For i=l To 3
k=k+p(i)*2
Nexti
Printk
End Sub
程序运行后,单击命令按钮,输出结果是( )。
选项
A、35
B、28
C、33
D、37
答案
C
解析
题中第一个循环功能是给数组a赋值,即a(1)=1、即a(2)=2…;第二个循环功能是给数组p赋值,即p(1)=1、即p(2)=4、即p(3)=9;第三个循环是求K的值,即是将K值加上数组P所有元素的值,所以K=K+p(1)*2+p(2)*2+p(3)*2=33。
转载请注明原文地址:https://kaotiyun.com/show/PxTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有如下事件过程:PrivateSubForm_Click()Dimf1AsInteger,f2AsInteger,iAsIntegerDimsAsIntegerf1=1:f2=1s=f1
下列有关文件的叙述中,正确的是( )。
编写如下程序:PrivateSubCommand1_Click()DimiAsInteger,numAsIntegerDimarr(10)AsIntegerFori=0To10arr(
以下关于过程及过程参数的描述中,错误的是()。
以下关于函数过程的叙述中,正确的是()。
执行语句DimX,YAsInteger后,()。
窗体上有1个名称为Command1的命令按钮,能够使其向左移动100的语句是()。
下列数据结构中,不能采用顺序存储结构的是()。
以下说法中正确的是()。
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有一个名称为Text1的文本框;还有两个名称分别为C1、C2的命令按钮,标题分别为“计算”、“存盘”。有一个函数过程isprime(a)可以在程序中直接调用,其功能是判断参数a是否为素数,如果是素数,则
随机试题
A.渗透和滤过B.主动转运C.入胞作用D.单纯扩散E.易化扩散水分在小肠的吸收机制为【】
A、For30minutesonly.B、Foronehouronly.C、Withinthebookedtimeonly.D、Longerthanthebookedtime.D女士说可以一直玩到下一个人来为止,即比预约
某工程签约合同总价为2000万元,开工预付款为合同总价的10%,在第1月全额支付。下表是承包人每个月实际支付完成的工程进度款(实际完成量可能超过或少于签约合同价,本案例实际完成进度款总额1950万元)。根据《公路工程标准施工招标文件》(2018年版)的规定
税务行政诉讼的原则有()。
每天早上李刚定时离家上班,张大爷定时出家门散步,他们每天都相向而行且准时在途中相遇。有一天李刚因有事提早离家出门,所以他比平时早7分钟与张大爷相遇。已知李刚每分钟行70米,张大爷每分钟行40米,那么这一天李刚比平时早出门()分钟。
在结构化方法中,用数据流程图(DFD)作为描述工具的软件开发阶段是()。
NinetimesasmanyAmericansdiedinthefarmlandsnearAntietamCreekinthefallof1862thandiedonthebeachesofNormandy
【B1】【B9】
Iftheyhadn’tspentallthemoneyonthelottery,theirlife______somiserableatthemoment.
Trafficlightsarecrucialtoolsforregulatingtrafficflow.Theyarenot,however,perfect.Atunmanagedjunctions,apattern
最新回复
(
0
)