问答文章1 问答文章501 问答文章1001 问答文章1501 问答文章2001 问答文章2501 问答文章3001 问答文章3501 问答文章4001 问答文章4501 问答文章5001 问答文章5501 问答文章6001 问答文章6501 问答文章7001 问答文章7501 问答文章8001 问答文章8501 问答文章9001 问答文章9501

VB中如何计算数值数组中各元素值之和

发布网友 发布时间:2022-06-26 11:43

我来回答

3个回答

热心网友 时间:2024-11-16 21:26

Option Explicit
Option Base 1
Private Sub Form_Activate()
Dim a(5), sum As Integer, i As Integer
a(1) = 1: a(2) = 2: a(3) = 3: a(4) = 4: a(5) = 5
For i = 1 To 5
sum = sum + a(i)
Next
MsgBox Join(a, "+") & "=" & sum
Unload Me
End Sub

热心网友 时间:2024-11-16 21:26

Private Sub Command1_Click()
Dim a() As Integer
n = 5 '假设为输入5个
For i = 1 To n '
ReDim a(i)
a(i) = Val(InputBox("请输入数字"))
Sum = Sum + a(i)
Next
Print Sum
End Sub

热心网友 时间:2024-11-16 21:27

Private Sub Command1_Click()Dim i, s, a(5) As Integera(1) = 1a(2) = 2a(3) = 3a(4) = 4a(5) = 5s = 0For i = 1 to 5 s = s + a(i)NextPrint sEnd Sub
声明声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。E-MAIL:11247931@qq.com
手机为啥投屏不到电视上 投屏到电视机上为什么不行了呢? 什么是超买状态,如何看出—个股票处于超买状态了? 用电脑怎么弄表格在电脑上制作表格怎么制作 ...明细帐、财务报表,带公式,EXCELE格式的文件,能发给我吗谢_百度... 电脑出入库表格怎么做作为一个仓管员excel表格如何做出入库存库存电脑会... 你好,可以发下库存管理的EXCEL表格么?衣服面料辅料都要统计,谢谢!麻烦... 电脑怎么制作电子表格如何用电脑制作表格 你好,能给我发一份出纳excel 做账模板现金流水账表格 芝麻香鸡有什么值得推荐的做法? labview如何把一列数值数组的值插入字符表格中的指定列中? 如何判断数值数组中得某一位置是否有值 ibαnez是什么牌子的吉他? ibviii是什么牌子? 车标ib是什么牌子的车 天麦搅拌机多少钱? 征求些ESET nod32 4.0的用户名和密码 UPS收购TNT成功了吗? 股票软件中的长线分别有,粉红色、绿色、白色、黄色,这些线条都分别代表... k线图中的粉红色长线,暗红色长线,蓝色长线,绿色长线分别表示什么意思... ...一个少女的人物一个叫巧克力一个叫香草,是个魔法世界剧情的。谁知道... 关于一部动画片:我就记得其中女主角有两个,分别叫巧克丽和香草 推荐几部被女人甩了而牛逼的都市完本小说 一部动漫女主有两个叫巧克力,香草, 爱须香草的香草♪公主の介绍 有一个日本动画中有个人物叫“香草”,是关于魔法的动画,叫什么啊... 吴彦祖代言的那个欧莱雅男士我脸爱出油应该用哪个系列? 香草世家原产地 华为手机外包装上的码是什么- 问一问 公司名称前缀“中共”说明什么? 为什么字符数组需要以'\0'结束,而数值数组就不需要呢 如何选择适合自己的基金品种 郑州九区内有什么好玩的地方吗 山西嗨拼车商务信息咨询有限公司怎么样? 怎样才能更好的除去鼻上的黑头 诸葛亮明知关羽会放走曹操,为什么还要他去把守华容道最后一关?_百度知 ... 不插CPU,能不能给主板通电,会有什么反应 不插cpu主板可以通电吗 凯迪莱克xt5首付3万月供999是真的吗 凯迪拉克轿车多少钱最低 如果分期付款 首付估计多少,帮我研究一下 打算... 丰田卡罗拉跑到160仪表显示动力降低是什么原因 丰田迈速表160什么车? 丰田卡罗拉跑到160仪表显示动力降低是什么原因? 一汽丰田锐放最大离地间隙 丰田锐放最小离地间隙 丰田车有车身160宽的吗 丰田花冠时速160发动机转速在4000正常吗? 丰田威驰跑到160迈时转速表能达到多少转 丰田致炫开到160发哆嗦怎么事 ...的书或文章写一则推荐词,要求:字数不少于200字,要介绍清楚书或文章的...