报错信息：
Automation error
The specified procedure could not be found

-2147024769(8007007f)

简要代码如下：（错误出在加黑斜体处）
Private mlsvSolver As LinSolver.LinSolver

Private Sub Command1_Click()
   
    On Error GoTo Err_Trap

    
    [i][b]Set mlsvSolver = New LinSolver.LinSolver[/b][/i]

Err_Trap:
         MsgBox "Error: " & Err.Description, vbCritical, _
                "Opps! Error" & Str$(Err.Number)

End Sub