主题：问个判断表名的问题

 我做了个目录树下拉的窗口,有两到三个表要调用此窗口,目录树双击的代码我这样写,但是出错:

   For Each frm As WinForm.form In Forms
    Tables(frm.TableName).Current("第一列")= e.Node.FullPath
Next
e.form.close()

改用当前表名可以,但是我要在其他的表打开窗口的.所以肯定不能用当前表判断的,这个表名怎么写?

逻辑问题，每个窗口所属的表都有“第一列”？

For Each frm As WinForm.Form In Forms
    If frm.TableName = "小区档案" Then
        Tables("小区档案").Current("所属地区")= e.Node.FullPath
    End If
Next
For Each frm1 As WinForm.Form In Forms
    If frm1.TableName = "销售人员档案" Then
        Tables("销售人员档案").Current("责任地区")= e.Node.FullPath
    End If
Next
e.form.close()

老大,我改成这样,小区档案可以用,但是销售人员档案就会出错?   一楼的代码,我只测试了一个窗口就提示没有实例了.根本不给判断

For Each frm As WinForm.Form In Forms
    If frm.TableName = "小区档案" Then
        Tables(frm.TableName).Current("所属地区")= e.Node.FullPath   
    ElseIf frm.TableName = "销售人员档案" Then
        Tables(frm.TableName).Current("责任地区")= e.Node.FullPath
    End If
Next
e.form.close()

我这样写的,现在就是小区档案可以 销售人员档案就是提示没有实例,什么原因呢?

呵呵，你的问题经常是无厘头的，做个简单例子说明吧。

  呵呵,用QQ用惯了.有时碰到问题,就想到什么问什么?

  这个不是我无厘头  那个代码一会儿可以,一会儿又不行.代码应该没有问题,后来关了项目就正常了.