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

Beginnen Sie damit, Matrix.cls und Vector.cls zu kompilieren, um die gemeldeten Fehler zu reproduzieren. Überprüfen Sie ReplaceRow in Matrix.cls und Magnitude in Vector.cls. Stellen Sie anschließend sicher, dass die korrigierten Member-Referenzen kompiliert werden und die Magnitudenberechnung weiterhin wie vorgesehen funktioniert.

Vom Indexierungsmodell aus dem Issue-Text verfasst.