『求助』VB编程中使用MatrixVB的问题
浏览：141924 回答：4
VB编程中使用MatrixVB的问题
我现在使用VB编程，由于需要进行大量的矩阵运算故加载了MatrixVB模块。在尝试性的编写了一个小程序后发现计算结果有问题（和手算的对不上），不知是何原因。请各位专家指教。
源程序如下：
Private Sub Form_Load()
a(1, 1) = 1: a(1, 2) = 1: a(1, 3) = 2
a(2, 1) = 1: a(2, 2) = 2: a(2, 3) = 1
a(3, 1) = 2: a(3, 2) = 1: a(3, 3) = 2
b(1, 1) = 3: b(1, 2) = 5: b(1, 3) = 2
b(2, 1) = 1: b(2, 2) = 4: b(2, 3) = 3
b(3, 1) = 2: b(3, 2) = 4: b(3, 3) = 3
End Sub
Private Sub Command2_Click()
d = zeros(3, 3)
ma = zeros(3, 3)
mb = zeros(3, 3)
For i = 1 To 3
For j = 1 To 3
ma(i, j) = a(i, j)
mb(i, j) = b(i, j)
Next j
Next i
d = times(minus(ldivide(a, b), eye(3, 3)), a)
d.Show
Print "显示矩阵C结果"
For i = 1 To 3
For j = 1 To 3
c(i, j) = d.r2(i, j)
Print c(i, j); Spc(3);
Next j
Print
Next i
End Sub
![[免费案例]Ensight案例教程分享](https://img.jishulink.com/cimage/245b3ca9e2c939e40491a25edae94515.jpeg?image_process=resize,fw_576,fh_320,)
