TableType
窗口中的Table有多种类型,可以通过此属性返回Table的类型。
如果还没有接触窗口设计,可以暂时跳过此属性。
本属性返回值为TableTypeEnum枚举,可选值有:
Normal
SQLTable
SQLQuery
Normal类型的Table还有是否为副本的区分,可以用IsCopy属性判断某个Table是否为副本。
示例
Dim s As
String
Dim t As
Table = Tables("窗口1_Table1")
Select
Case
t.TableType
Case TableTypeEnum.Normal
If t.IsCopy
Then
s = "副本"
Else
s = "标准"
End
If
Case
TableTypeEnum.SQLTable
s = "SQLTable"
Case TableTypeEnum.SQLQuery
s =
"SQLQuery"
End
Select
MessageBox.Show(s)
提示:如果窗口中的Table类型为Normal,且为非副本,那么上述代码执行会出错,因为此时并不存在名为“窗口1_Table1”的Table,只是将原来的Table由主界面移到窗口而已。