新手小白求教,二维数组相乘只有第一项,其余项为零
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
图片附件: 游客没有浏览图片的权限,请
登录 或
注册