Finding system objects - Access 2K [Resolved]

[salvelinus]

I'm populating a listbox with the names of the tables, queries, forms, etc, in the database. The eventual goal is to be able to make changes in one template database and have a form that will copy the changes to about sixty other db's automatically.
Anyway, I don't want the (normally) hidden system objects to appear in the listbox. I know I could check Left(tbl.Name, 4) for "Msys", but is there a more OOP way, like checking for a system or hidden property?
Also, is there a reason that there's no .AddItem property for a standard listbox?
Thanks.

Dim ObjAO As AccessObject
      Dim Obj As Object
      Dim s As String
           
      Set Obj = Application.CurrentData
      lstObjects.RowSourceType = "Value List"
      
      For Each ObjAO In Obj.AllTables
            If Not ObjAO.blah = vbSystem Then   'This is where I want a check
               s = s & ObjAO.Name & ";"
            End If
      Next
     
      lstObjects.RowSource = s