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 intM As Integer, intN As Integer
Public x() As Double, y() As Double '試驗數據
Public xx() As Double
Public b() As Single                '回歸系數
Public a() As Double                '工作單元
Public t() As Single                't檢驗值
Public N As Integer                 '數據點數
Public M As Integer                 '最高冪次
Public Key As Integer               'Key=1:預測。Key=2:平滑。Key=3:等距