-
Notifications
You must be signed in to change notification settings - Fork 0
/
iTable.cls
59 lines (43 loc) · 1.36 KB
/
iTable.cls
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
VERSION 1.0 CLASS
BEGIN
MultiUse = -1 'True
END
Attribute VB_Name = "iTable"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = False
Attribute VB_Exposed = False
Option Explicit
' 2020-04-08
' Added 3 database related routines to support
' the capability to read/write to/from an access database
Public Property Get HeaderWidth() As Long
End Property
Public Property Get LocalDictionary() As Dictionary
End Property
Public Property Get LocalTable() As ListObject
End Property
Public Property Get Headers() As Variant
End Property
Public Property Get Initialized() As Boolean
End Property
Public Sub Initialize()
End Sub
Public Function TryCopyDictionaryToArray(ByVal Dict As Dictionary, ByRef Ary As Variant) As Boolean
End Function
Public Function TryCopyArrayToDictionary(ByVal Ary As Variant, ByRef Dict As Dictionary) As Boolean
End Function
Public Sub FormatArrayAndWorksheet( _
ByRef Ary As Variant, _
ByVal Table As ListObject)
End Sub
Public Property Get LocalName() As String
End Property
Public Property Get CreateKey(ByVal Record As iTable) As String
End Property
Public Property Get IsDatabase() As Boolean
End Property
Public Property Get DatabaseName() As String
End Property
Public Property Get DatabaseTableName() As String
End Property