计算机测绘程序设计代码.pdfVIP

计算机测绘程序设计实验代码 矩阵运算代码： Option Base 1 Dim a() As Double Dim b() As Double Dim c() As Double Private Sub Command1_Click() Dim n1 As Integer Dim m1 As Integer Dim n2 As Integer Dim m2 As Integer Dim mystring() As String Dim l() As String mystring() = Split(Text1.Te