所有变量均设置好了的
For Each td In db.TableDefs If (td.Attributes And dbSystemObject) = 0 Then '甩掉系统表 If (td.Attributes <> dbAttachedTable) Then '甩掉附属表 lstTDName.AddItem td.Name '用户表进入列表框 End If End If Next
为何td.Attributes And dbSystemObject用and 我用监视调试,开始时(td.Attributes And dbSystemObject) 的值为2,and 产生的结过不是只有true/false/1/0吗?后来就变成0了。dbSystemObject不是一常量吗。只用td.Attributes =0不就行了吗???为何要用(td.Attributes And dbSystemObject) = 0
这是一本书上的例子。能运行没错。