Wiki der Access Code Library

Gemeinsam zu mehr Effizienz in der Anwendungserstellung

Sichtbarkeit einer Access-Tabelle

Aus Access Code Library
(Unterschied zwischen Versionen)
Wechseln zu: Navigation, Suche
K
 
(Der Versionsvergleich bezieht 1 dazwischenliegende Version mit ein.)
Zeile 1: Zeile 1:
[[Kategorie:Code-Schnipsel]]
[[Kategorie:Code-Schnipsel]]
<source lang="vb">
<source lang="vb">
-
Function TableIsVisible(ByVal sTabName As String) As Boolean
+
Function TableIsVisible(ByVal TabName As String) As Boolean
-
   TableIsVisible = Not ((Application.CurrentData.AllTables.Item(sTabName).Attributes And 8) = 8)
+
   TableIsVisible = Not ((Application.CurrentData.AllTables.Item(TabName).Attributes And 8) = 8)
End Function
End Function
</source>
</source>

Aktuelle Version vom 14:56, 25. Jan. 2011

Function TableIsVisible(ByVal TabName As String) As Boolean
   TableIsVisible = Not ((Application.CurrentData.AllTables.Item(TabName).Attributes And 8) = 8)
End Function
Von „https://wiki.access-codelib.net/Sichtbarkeit_einer_Access-Tabelle“