从品牌网站建设到网络营销策划,从策略到执行的一站式服务
你对For Each的使用没有明确
我们提供的服务有:做网站、网站设计、微信公众号开发、网站优化、网站认证、拜泉ssl等。为成百上千家企事业单位解决了网站和推广的问题。提供周到的售前咨询和贴心的售后服务,是有科学管理、有技术的拜泉网站制作公司
你这里的意思是指,,i属于a数组,所以,i会是2,也会是4,也会是6,也会是8,也会是10,也会是12.。。。如果 再用a(i)去 索引数组中的数据肯定会超出索引范围
你这个改,把
sum += a(i)
改成:
sum += i
就可以了
i、j两个变量在for循环结束后数值都是6,
所以你的a(i,j)=a(6,6),但是你定义是Dim a%(5, 5),所以才会提醒“索引超出了数组界限”的。
没看明白你的TextBox1.text是来显示什么的?
如果用来显示a(5,5)的直接写TextBox1.Text = a(5, 5)就可以了呀
在VB里,"平均分"(pingjunfen), 这是数组的调用方法,当然会报错了
这样改吧:
Dim xingming As String
Dim yuwen As Short
Dim shuxue As Short
Dim yingyu As Short
Dim zonghe As Short
Dim pingjunfen As Short
xingming = InputBox("输入姓名", "输入名字吧")
yuwen = InputBox("输入语文成绩", vbOKOnly)
shuxue = InputBox("输入数学成绩", vbOKOnly)
yingyu = InputBox("输入英语成绩", vbOKOnly)
zonghe = yuwen + shuxue + yingyu
pingjunfen = zonghe / 3
MsgBox("平均分:" pingjunfen, [vbOKOnly])
成都网站建设公司地址:成都市青羊区太升南路288号锦天国际A座10层 建设咨询028-86922220
成都快上网科技有限公司-四川网站建设设计公司 | 蜀ICP备19037934号 Copyright 2020,ALL Rights Reserved cdkjz.cn | 成都网站建设 | © Copyright 2020版权所有.
专家团队为您提供成都网站建设,成都网站设计,成都品牌网站设计,成都营销型网站制作等服务,成都建网站就找快上网! | 成都网站建设哪家好? | 网站建设地图