VB有现成的矩阵类吗？比如能实现矩阵的求逆、转置、矩阵乘、求矩阵特征值等等运算。

我以前自己编过一些，求逆用的LU分解，转置比较简单，其他的还作了矩阵右除用的QR分解

代码比较丢人- - 那时候VB还是初学

下面放到模块里

Public Sub Matrix_LU(ByRef X() As Double, ByVal m As Integer, ByVal n As Integer, ByRef A() As Double, ByRef P() As Double)
Dim pp, Maxval, lutemp, ptemp
For i = 1 To m
For j = 1 To n
A(i, j) = X(i, j)
Next
Next

For i = 1 To m
P(i) = i
Next
For k = 1 To min(m - 1, n)
pp = k
Maxval = Abs(A(k, k))
For i = k + 1 To m
If Abs(A(i, k)) > Maxval Then
Maxval = Abs(A(i, k))
pp = i
End If
Next
If pp <> k Then
For C = 1 To n
lutemp = A(pp, C)
A(pp, C) = A(k, C)
A(k, C) = lutemp
Next
ptemp = P(k)
P(k) = P(pp)
P(pp) = ptemp
End If
If A(k, k) <> 0 Then
For i = k + 1 To m
A(i, k) = A(i, k) / A(k, k)
Next
For j = k + 1 To n
For i = k + 1 To m
A(i, j) = A(i, j) - A(i,