数据文件_编辑m.bas

<VB数理统计实用算法>书中的算法源程序

Attribute VB_Name = "modFileEdit"
'对数据文件进行编辑
'数据文件的格式是：
'   1。“列数”占第1行的第1列，其余列用******填充，必须，自动获取
'   2。“行数”占第2行的第1列，其余列用******填充，必须，自动获取
'   3。“总行数”占第3行的第1列，其余列用******填充，必须，自动求出
'   4。图题，占第4行的第1列，其余列用******填充，可选，由用户填写
'   5。行标，其所占行数与行数相同，只占第1列，其余列用******填充，可选，由用户填写
'   6。列标，占1行的所有列，可选，由用户填写
'   7。数据部分，占所有列，由用户填写
'在图题、行标、列标中，图题优先，行标其次。有行标必须有图题，有列标必须有图题、行标
'
Option Explicit
Public intRow As Integer            '行数
Public intRowAll As Integer         '包括图题、行标和列标的总行数
Public intCol As Integer            '列数
Public blnTitle As Boolean          '是否有图题
Public blnRowLabel As Boolean       '是否有行标
Public blnColLabel As Boolean       '是否有列标
Public strFileName                  '文件名
Public intFileNumber As Integer     '文件号