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

Bắt đầu bằng cách biên dịch Matrix.cls và Vector.cls để tái hiện các lỗi đã báo cáo. Xem xét ReplaceRow trong Matrix.cls và Magnitude trong Vector.cls, sau đó xác minh rằng các tham chiếu thành viên đã được sửa biên dịch thành công và phép tính độ lớn vẫn hoạt động như dự kiến.

Do mô hình lập chỉ mục viết ra từ nội dung của issue.