daomodule.vb

来自「本页只为图象处理爱好者交流之用, 未经本人同意, 请勿下载. 另,本书及所附」· VB 代码 · 共 15 行

Option Strict Off
Option Explicit On
Module DAOModule
	Public MyWS As DAO.Workspace
	Public MyDB As DAO.Database
	Public MyRS As DAO.Recordset
	Public MyTD As DAO.TableDef
	Public MyField As DAO.Field
	Public MyIndex As DAO.Index
	Public FieldNum As Short
	Public TableNum As Short
    Public CurrentTable As String
    Public FieldType(100) As Integer
    Friend DAODBEngine_definst As New DAO.DBEngine()
End Module