曲面_网状立体图m1.bas

来自「<VB数理统计实用算法>书中的算法源程序」· BAS 代码 · 共 13 行

Attribute VB_Name = "modParameter"
'绘网状立体图
Option Explicit
Public intRow As Integer                '行数
Public intRowAll As Integer             '总行数
Public intCol As Integer                '列数
Public strFileName As String            '数据文件
Public strLabelName As String           '图形标题
Public M As Integer, N As Integer       '数据点的行数和列数
Public U() As Double, V() As Double     '数据点值
Public U1() As Double, V1() As Double   '数据点值