新手小白求教，二维数组相乘只有第一项，其余项为零 - VB6论坛

| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛 |

编程论坛 → 开发语言 → 『 VB6论坛』 → 新手小白求教，二维数组相乘只有第一项，其余项为零

我的收件箱(0)

欢迎加入我们，一同切磋技术

共有 1482 人关注过本帖

标题：新手小白求教，二维数组相乘只有第一项，其余项为零

取消只看楼主加入收藏

小麦哥

等　级：新手上路
帖　子：16
专家分：0
注　册：2018-3-14
结帖率：50%

楼主

已结贴√ 问题点数：10 回复次数：1

新手小白求教，二维数组相乘只有第一项，其余项为零

Public Function DEWL(ByRef E#(), L(), AE()) As Double
Dim i%, j%,  ABC#(21, 21)
For i = 1 To 21
For j = 1 To 21
  ABC(i, j) = (AE(i) * AE(j)) ^ (1 / 2)
   E(i, j) = (ABC(i, j)) * L(i, j)
   Next j
  Next i
End Function

图片附件: 游客没有浏览图片的权限，请登录或注册

搜索更多相关主题的帖子: 维数　相乘　 Function　ABC　Next　

2018-04-28 11:41

小麦哥

等　级：新手上路
帖　子：16
专家分：0
注　册：2018-3-14

第 2 楼

得分:0

回复 2楼 ZHRXJR

前面有赋值的，通过Array()赋值

2018-05-02 09:39

快速回复：新手小白求教，二维数组相乘只有第一项，其余项为零