diff options
Diffstat (limited to 'wizards/source/formwizard/DBMeta.xba')
-rw-r--r-- | wizards/source/formwizard/DBMeta.xba | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/wizards/source/formwizard/DBMeta.xba b/wizards/source/formwizard/DBMeta.xba index 68759966daf9..b0fa20b7a901 100644 --- a/wizards/source/formwizard/DBMeta.xba +++ b/wizards/source/formwizard/DBMeta.xba @@ -305,8 +305,8 @@ Dim MaxQueryIndex as Integer Dim MaxIndex as Integer Dim i as Integer Dim a as Integer - MaxTableIndex = Ubound(TableNames() - MaxQueryIndex = Ubound(QueryNames() + MaxTableIndex = Ubound(TableNames()) + MaxQueryIndex = Ubound(QueryNames()) MaxIndex = MaxTableIndex + MaxQueryIndex + 1 If MaxIndex > -1 Then Dim LocCommandTypes(MaxIndex) as Integer @@ -344,4 +344,4 @@ Function AssignFieldLength(FieldLength as Long) as Integer AssignFieldLength() = FieldLength End If End Function -</script:module>
\ No newline at end of file +</script:module> |