Foxtable(狐表)用户栏目专家坐堂 → 页面代码排错请教,第一次执行没有问题,第二次执行出错!


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

主题:页面代码排错请教,第一次执行没有问题,第二次执行出错!

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


加好友 发短信
等级:三尾狐 帖子:700 积分:6248 威望:0 精华:0 注册:2018/5/10 9:05:00
页面代码排错请教,第一次执行没有问题,第二次执行出错!  发帖心情 Post By:2019/7/25 9:04:00 [显示全部帖子]

请教各位老师  
1 窗体的页签代码第一次执行没有问题,第二次执行出错!
2 代码有没有更加简单快捷的实现方式

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


加好友 发短信
等级:三尾狐 帖子:700 积分:6248 威望:0 精华:0 注册:2018/5/10 9:05:00
  发帖心情 Post By:2019/7/25 9:04:00 [显示全部帖子]

附件是开发版 窗体  请老师下载帮助排错

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


加好友 发短信
等级:三尾狐 帖子:700 积分:6248 威望:0 精华:0 注册:2018/5/10 9:05:00
  发帖心情 Post By:2019/7/25 9:05:00 [显示全部帖子]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:线条下料汇总.zip


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


加好友 发短信
等级:三尾狐 帖子:700 积分:6248 威望:0 精华:0 注册:2018/5/10 9:05:00
  发帖心情 Post By:2019/7/25 9:17:00 [显示全部帖子]

想实现的功能是选择图片1和2时间生成下料明细表的统计
存在的问题是 第一没有问题 而且正确  选择另外一个单号执行
图片点击可在新窗口打开查看此主题相关图片如下:页签问题.jpg
图片点击可在新窗口打开查看
第二次有问题

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


加好友 发短信
等级:三尾狐 帖子:700 积分:6248 威望:0 精华:0 注册:2018/5/10 9:05:00
  发帖心情 Post By:2019/7/25 9:38:00 [显示全部帖子]

代码请见txt文件
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:新建文本文档.txt


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


加好友 发短信
等级:三尾狐 帖子:700 积分:6248 威望:0 精华:0 注册:2018/5/10 9:05:00
  发帖心情 Post By:2019/7/25 10:02:00 [显示全部帖子]

执行例子和数据库备份文件已经上传  请老师指导!
[此贴子已经被作者于2019/7/25 10:02:34编辑过]

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


加好友 发短信
等级:三尾狐 帖子:700 积分:6248 威望:0 精华:0 注册:2018/5/10 9:05:00
  发帖心情 Post By:2019/7/25 10:02:00 [显示全部帖子]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:页面测试.zip


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


加好友 发短信
等级:三尾狐 帖子:700 积分:6248 威望:0 精华:0 注册:2018/5/10 9:05:00
  发帖心情 Post By:2019/7/25 11:23:00 [显示全部帖子]

感谢指导

1报错问题依旧存在  选择某一个单号没有问题  假如选择第二个单号就开始报错
2 实现这个功能  有没有更加好的代码优化方案  希望指导一下  谢谢!


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


加好友 发短信
等级:三尾狐 帖子:700 积分:6248 威望:0 精华:0 注册:2018/5/10 9:05:00
  发帖心情 Post By:2019/7/25 11:34:00 [显示全部帖子]

Dim dt As DataTable
    DataTables("zzmjcomtxmxhz").LoadFilter = "[单号] = '" & dth & "' "
    DataTables("zzmjcomtxmxhz").Load()
    dt=DataTables("zzmjcomtxmxhz")
    Dim g As New CrossTableBuilder("统计表10", dt)
    g.HGroups.AddDef("MGBH")
    g.VGroups.AddDef("xd")
    g.Totals.AddDef("sl", "sl")
    g.HorizontalTotal = True
    g.VerticalTotal = True
    g.Decimals = 0
    g.Subtotal = True
    'g.FromServer = True
    g.Build()
    'Tables.(  = Tables("统计表10")

    e.Form.Controls("Table6").Table.DataSource =g.BuildDataSource
    Tables("线条下料计划_Table6").AutoSizeCols
    Tables("线条下料计划_Table6").Cols.Frozen = 1
这里代码有问题   我为了获取当前zzmjcomtxmxzb.zzmjcomtxmxhz子表数据把子表 DataTables("zzmjcomtxmxhz")从新按照条件加载了
代码应该是需要优化一下  麻烦指导一下

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


加好友 发短信
等级:三尾狐 帖子:700 积分:6248 威望:0 精华:0 注册:2018/5/10 9:05:00
  发帖心情 Post By:2019/7/25 11:43:00 [显示全部帖子]

顶贴  依旧没有达到想要的效果  zzmjcomtxmxzb.zzmjcomtxmxhz 应该在("zzmjcomtxmxhz")选择新单号自动加载嘛

 回到顶部
总数 11 1 2 下一页