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

Commencez par compiler Matrix.cls et Vector.cls afin de reproduire les erreurs signalées. Examinez ReplaceRow dans Matrix.cls et Magnitude dans Vector.cls, puis vérifiez que les références de membres corrigées se compilent et que le calcul de la magnitude fonctionne toujours comme prévu.

Rédigé par le modèle d'indexation à partir du texte de l'issue.