module1.bas

来自「大学人事管理系统的源代码」· BAS 代码 · 共 14 行

Attribute VB_Name = "Module1"
Option Explicit
Public FNAME As String
Public rs As Recordset
Public DataFile As Integer
Public Fl As Long
Public block As Integer
Public Const blocksize As Integer = 16384
Public Fragment As Integer
Public Chunk() As Byte
Public I As Integer
Public db As Database
Public flag As Integer