以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何在显示表名之前,先判断表类型是否存在,如果不存在就不显示表名下拉列表内容,避免出错提示!  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=175384)

--  作者:cnsjroom
--  发布时间:2022/3/2 18:40:00
--  如何在显示表名之前,先判断表类型是否存在,如果不存在就不显示表名下拉列表内容,避免出错提示!

如何在显示表名之前,先判断表类型是否存在,如果不存在就不显示表名下拉列表内容,避免出错提示!

麻烦老师修正一下  谢谢!

 

当前项目有外部数据表  内部数据表  选择时候正常显示了表名列表内容

当选择外部查询表  内部查询表  临时表时,提示错误

.NET Framework 版本:4.0.30319.42000
Foxtable 版本:2020.5.29.8
错误所在事件:窗口,代码定义,ComboBox2,Enter
详细错误信息:
未将对象引用设置到对象的实例。

 

 

当前代码:

Dim cm As WinForm.ComboBox = e.Form.Controls("ComboBox2")
Dim cm1 As WinForm.ComboBox = e.Form.Controls("ComboBox1")
Dim bb As Integer
Dim s As String
If cm1.text="外部数据表" Then
    bb=3
Else If cm1.text="外部查询表" Then
    bb=4
Else If cm1.text="内部数据表" Then
    bb=1
Else If cm1.text="内部查询表" Then
    bb=2
Else If cm1.text="临时表" Then
    bb=5
End If

For Each dt As DataTable In DataTables
    If dt.Type= bb Then
        If dt.name = "表A"  OrElse dt.name Like "*_*" Then
        Else
            s = s & "|" & dt.name
        End If
    End If
Next
cm.ComboList=s.trim("|")


--  作者:有点蓝
--  发布时间:2022/3/3 8:40:00
--  
Dim s As String = ""