vb 2008 求逆矩阵 数组
代码行大概有200多行,压缩包里有两个不同的编法的程序。部分代码如下:
'判断是否存在全为0的列
flag=True
ForyAsInteger=0Toj
ForxAsInteger=0Toi
Ifvalue(x,y)0Then'如果存在一个非零值,则终止本行判断,继续下一行的判断
flag=False
ExitFor
EndIf
下载地址
用户评论
可以用,感谢感谢
算法不错,不过还需要自己仔细研究
感觉比较复杂,运行效率低,需要改进
我做的是一个应用程序,有可视化的界面,这个没怎么看懂