收藏本站   
欢迎来到答案网! 请  登录  |  注册 
   
答案网
  
 
 首页 | 语文答案 | 数学答案 | 英语答案 | 物理答案 | 化学答案 | 历史答案 | 政治答案 | 生物答案 | 地理答案 | 课后答案 | 日记大全 | 作文大全 | 句子大全 | 美文阅读
 练习册答案 | 暑假作业答案 | 寒假作业答案 | 阅读答案 | 学习方法 | 知识点总结 | 哲理小故事 | 祝福语大全 | 读后感 | 名人语录 | 题记大全 | 造句大全 | 心情不好的说说
提问 

在窗体上放置一个命令按钮Command1,并编写下列单击事件的程序: Option Base 1


时间: 2020-1-28 分类: 作业习题  【来自ip: 14.13.187.16 的 匿名网友 咨询】 手机版
单项选择题:
在窗体上放置一个命令按钮Command1,并编写下列单击事件的程序:
Option Base 1
Private Sub Command1_ Click()
Dim c As Integer,d As Integer
d=0
c=6
X=Array(2,4,6,8,10,12)
For i=1 To 6
If X(i)>c Then
d=d+X(i)
c=X(i)
Else
d=d.C
End If
Next i
Print d
End Sub
程序运行后,单击命令按钮,则在窗体上输出的结果是( )
A.10
B.12
C.16
D.20
  网友答案:
匿名网友
匿名网友
1楼
答案:B
解析: 程序首先使用Array函数为X数组变量赋值,然后利用For循环和If结构语句实现程序功能。程序执行过程如下:
(1)当i=1时,x(i)=2,d=d-c=-6;(2)当i=2时,x(i)=4,d=d-c=-12;(3)当i=3时,x(i)=6,d=d-c=.18;(4)当i=4时,x(i)=8,d=d+x(i)=-10,c=8;(5)当i=5时,X(i)=1O,d=d+x(i)=o,c=10;(6)当i=6时,X(i)=12,d=d+X(i)=12,c=12。
  相关问题列表
 学习方法推荐
 课本知识点总结
 作文推荐
 答案大全
 推荐问题
 热门回答
 文库大全
答案网   www.Zqnf.com