Attribute VB_Name = "modParameter"
'模糊聚類分析
'公有變量和數組
Option Explicit
Public X() As Double                    '原始數據
Public intRow As Integer                '行數
Public intCol As Integer                '列數
Public M As Integer, N As Integer       'm=intCol；n=intRow
Public strFileName As String            '數據文件
Public strResultFile As String          '結果文件
'數據預處理方法
Public intT1 As Integer, intT2 As Integer
'指示標定方法
Public Opt(1 To 15) As Integer
'標定過程中所需參數
Public dbM As Double, dbC As Double
Public R() As Double, RR() As Double    '相似矩陣
'截矩陣使用參數
Public dbL As Double                    'Lamda（入）值
'F檢驗使用參數
Public F1 As Double, F2 As Double, F As Double, Fa1 As Double, Fa2 As Double