主题：如何只获取项目中的所有内部表表名

如何只获取项目中的所有内部表表名

当前代码如下：是获取内部表和项目已经加载的所有表名，有么有办法只获取内部表表名呢？

Dim cm As WinForm.ComboBox = e.Form.Controls("ComboBox2")
Dim s As String
For Each dt As DataTable In DataTables
    ' messagebox.show(dt.name)       '获取所有表名
    If dt.name = "表A"  OrElse dt.name Like "*_*" Then
    Else
        s = s & "|" & dt.name
    End If
Next
cm.ComboList=s.trim("|")

谢谢老师  已经按照老师的指导  解决

Dim cm As WinForm.ComboBox = e.Form.Controls("ComboBox2")
Dim s As String
For Each dt As DataTable In DataTables
    ' messagebox.show(dt.name)       '获取所有表名
    If dt.Type=1 Then   ’1内部数据表2内部查询表3外部数据表4外部查询表5临时表

        If dt.name = "表A"  OrElse dt.name Like "*_*" Then
        Else
            s = s & "|" & dt.name
        End If
    End If
Next
cm.ComboList=s.trim("|")