Foxtable(狐表)用户栏目专家坐堂 → 窗体中的目录树AfterSelectNode事件出错?


  共有3050人关注过本帖平板打印复制链接

主题:窗体中的目录树AfterSelectNode事件出错?

帅哥哟,离线,有人找我吗?
zsxx999ja
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:212 积分:2275 威望:0 精华:0 注册:2020/10/3 6:58:00
窗体中的目录树AfterSelectNode事件出错?  发帖心情 Post By:2020/12/9 23:15:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:错图.jpg
图片点击可在新窗口打开查看
左边的目录树同时对窗体中的三个表进行动态加载,这三个表用sqltable类型时不出错,改成副本表后出现如上错误。检查里面引用的表名没有错,真不知是哪个对象引用错了,请帮助!

 

Dim dr As DataRow = e.Node.DataRow '获取生成此节点的行
Dim Filter As String
Dim Filter下校 As String
Dim Filter笔记与档案 As String
Dim Year As Integer = dr("年")
Dim Month As Integer = dr("月")
Dim Day As String = dr("日")
Select Case e.Node.Level
    Case 0
        Filter ="Year(通知时间) = " & Year
        Filter下校 ="Year(出差起日期) = " & Year
        Filter笔记与档案 ="Year(出差时间) = " & Year
    Case 1
        Filter ="Year(通知时间) = " & Year & " And Month(通知时间) = " & Month
        Filter下校 ="Year(出差起日期) = " & Year & " And Month(出差起日期) = " & Month
        Filter笔记与档案 ="Year(出差时间) = " & Year & " And Month(出差时间) = " & Month
    Case 2
        Filter ="Year(通知时间) = " & Year & " And Month(通知时间) = " & Month & " And  day(通知时间) =" & Day
        Filter下校 ="Year(出差起日期) = " & Year & " And Month(出差起日期) = " & Month & " And  day(出差起日期) =" & Day
        Filter笔记与档案 ="Year(出差时间) = " & Year & " And Month(出差时间) = " & Month & " And  day(出差时间) =" & Day
End Select

DataTables("短信内容").LoadFilter = Filter
DataTables("短信内容").Load
DataTables("督导组下校登记").LoadFilter = Filter下校
DataTables("督导组下校登记").Load
DataTables("笔记本与档案").LoadFilter = Filter笔记与档案
DataTables("笔记本与档案").Load


 回到顶部
总数 28 1 2 3 下一页