Foxtable(狐表)用户栏目专家坐堂 → 数据表窗口触发事件


  共有1705人关注过本帖树形打印复制链接

主题:数据表窗口触发事件

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


加好友 发短信
等级:童狐 帖子:211 积分:1371 威望:0 精华:0 注册:2017/1/10 20:17:00
数据表窗口触发事件  发帖心情 Post By:2017/7/21 6:14:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:微信截图_20170721070705.png
图片点击可在新窗口打开查看
这本来是写在项目事件里,但是每次打开时提示后,直接出现数据表,返回主菜单有点麻烦。我就想写在窗口事件里,但是打开窗口时提示未将对象引用设置到对象的实例!所以想请教如果这段代码写在窗口事件里怎么写?

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:109678 积分:558082 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/7/21 8:59:00 [只看该作者]

这段代码看不出问题。是不是补货表还没有加载?

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/7/21 9:16:00 [只看该作者]

代码没问题。

 

看看是否你补货表currentChanged事件或datacolchanged事件有问题。


 回到顶部
帅哥哟,离线,有人找我吗?
tingke
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:211 积分:1371 威望:0 精华:0 注册:2017/1/10 20:17:00
回复:(有点蓝)这段代码看不出问题。是不是补货表还...  发帖心情 Post By:2017/7/22 2:03:00 [只看该作者]

打开补货表窗口就会自动加载补货表不是吗?

 回到顶部
帅哥哟,离线,有人找我吗?
tingke
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:211 积分:1371 威望:0 精华:0 注册:2017/1/10 20:17:00
回复:(有点甜)代码没问题。 看看是否你补...  发帖心情 Post By:2017/7/22 2:05:00 [只看该作者]

补货表里只有一个打扰我drawcell事件
代买如下:
If e.Col.Name = "出货日期" Then
    If e.Row.IsNull("出货日期") = False Then
        If e.Row("出货日期") = Date.Today Then
            e.Style = "出货"
        Else If e.Row("出货日期") = Date.Today.AddDays(1) Then
            e.Style = "未送"
        End If
    End If
End If

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:109678 积分:558082 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/7/22 8:40:00 [只看该作者]

这个代码也没有问题,上传例子看看

 回到顶部
帅哥哟,离线,有人找我吗?
tingke
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:211 积分:1371 威望:0 精华:0 注册:2017/1/10 20:17:00
  发帖心情 Post By:2017/7/24 22:40:00 [只看该作者]


补货表,密码默认,想要在菜单栏点击按钮,打开窗口出现提示,不想打开项目时提示
[此贴子已经被作者于2017/7/25 1:09:53编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:109678 积分:558082 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/7/24 23:00:00 [只看该作者]

去掉2个地方的这一句代码:MainTable = Tables("补货表")

 回到顶部
帅哥哟,离线,有人找我吗?
tingke
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:211 积分:1371 威望:0 精华:0 注册:2017/1/10 20:17:00
回复:(有点蓝)去掉2个地方的这一句代码:MainTable...  发帖心情 Post By:2017/7/25 1:09:00 [只看该作者]

谢谢,已经可以啦

 回到顶部