VBA-Math-Objects Errors in Matrix.cls and Vector.cls

Hi, Thanks for your efforts and sharing's

When I compile your codes

in Matrix.cls file:

Public Function ReplaceRow(iNum, inRow As Vector) As Matrix
If Me.N <> inRow.N Then

Should be corrected. Vector does not have N

If Me.N <> inRow.M Then

in Vector.cls file

Public Function Magnitude()
Sum = 0

Should be corrected. Vector has a Sum function also

Public Function Magnitude()
dsum = 0
For i = 1 To Me.M
dsum = dsum + dA(i, 1) ^ 2
Next i
Magnitude = Math.sqr(dsum)
End Function

Good days

首先编译 Matrix.cls 和 Vector.cls，以重现报告的错误。检查 Matrix.cls 中的 ReplaceRow 和 Vector.cls 中的 Magnitude，然后验证修正后的成员引用能够编译，并且幅值计算仍按预期工作。

由索引模型根据 Issue 内容生成。