Vb一维数组，赋值、求和、求平均值,如何编程啊？
推荐于2017-11-29 · 知道合伙人软件行家
yfcp
知道合伙人软件行家
采纳数：1748
获赞数：5545
有多年网站建设相关工作经验。熟悉ASP、ASP.net、VB、JavaScript、HTML等语言和CSS、Ajax等相关技术。
向TA提问 私信TA
关注
![]()
展开全部
下面是数据一个简单的例子，赋值、求和、求平均值都包括了：
Dim a(4) As Long '定义数组a(4)
Private Sub Command1_Click()
Dim i As Long, x As Long, y As Double
For i = 0 To 4
a(i) = i '给数组赋值
Print "a(" & i & ")=" & a(i)
x = x + a(i)'计算数组和
Next
Print "数组和是：" & x
y = x / (UBound(a) + 1)'平均数
Print "数组平均数是：" & y
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
