Attribute VB_Name = "modParameter"
'一元線性回歸
Option Explicit
Public intRow As Integer            '行數(shù)
Public intRowAll As Integer         '總行數(shù)
Public intCol As Integer            '列數(shù)
Public strFileName As String        '數(shù)據(jù)文件
Public strLabelName As String       '標(biāo)題
Public intM As Integer, intN As Integer
Public x() As Double, y() As Double '試驗數(shù)據(jù)
Public n As Integer                 '數(shù)據(jù)點(diǎn)數(shù)
Public b0 As Single, b1 As Single   '回歸系數(shù)