Foxtable(狐表)用户栏目专家坐堂 → 代码执行后无效果,但也不出错误提示


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

主题:代码执行后无效果,但也不出错误提示

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


加好友 发短信
等级:幼狐 帖子:144 积分:1107 威望:0 精华:0 注册:2014/6/1 10:22:00
代码执行后无效果,但也不出错误提示  发帖心情 Post By:2014/9/20 14:03:00 [显示全部帖子]

代码执行后没有效果,但也不会出错误 提示,这就难办了,不知道哪不对了,求老师指点一下。
With DataTables("原始初级表")
    .DataCols("规格").RaiseDataColChanged(.DataRows(0))
End With

If MessageBox.Show("确认要转换规格吗?", "请确认", MessageBoxButtons.YesNo, MessageBoxIcon.Question) =DialogResult.Yes Then
If Tables("原始初级表").Current("规格") = "3克" Then
   SystemReady=False
   Tables("原始初级表").Current("购进量") = Tables("原始初级表").Current("购进量")/100
   SystemReady=True
Else
If Tables("原始初级表").Current("规格") = "3克*10小袋" Then
   SystemReady=False
   Tables("原始初级表").Current("购进量") = Tables("原始初级表").Current("购进量")/10
   SystemReady=True
End If
End If
End If

MessageBox.Show("转换完成")

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


加好友 发短信
等级:幼狐 帖子:144 积分:1107 威望:0 精华:0 注册:2014/6/1 10:22:00
  发帖心情 Post By:2014/9/20 14:11:00 [显示全部帖子]

我想实现所有为3克的规格,购进量除以100,所有为3克*10小袋的规格,购进量除以10。应该怎么改BIN老师?

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


加好友 发短信
等级:幼狐 帖子:144 积分:1107 威望:0 精华:0 注册:2014/6/1 10:22:00
  发帖心情 Post By:2014/9/20 14:48:00 [显示全部帖子]

当规格为3克时,购进量除以100,当规格为3克*10袋时,购进量除以10,请BIN老师指点

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


加好友 发短信
等级:幼狐 帖子:144 积分:1107 威望:0 精华:0 注册:2014/6/1 10:22:00
  发帖心情 Post By:2014/9/20 14:55:00 [显示全部帖子]

这是列子

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


加好友 发短信
等级:幼狐 帖子:144 积分:1107 威望:0 精华:0 注册:2014/6/1 10:22:00
  发帖心情 Post By:2014/9/20 14:55:00 [显示全部帖子]

附件怎么传不上去呢?

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


加好友 发短信
等级:幼狐 帖子:144 积分:1107 威望:0 精华:0 注册:2014/6/1 10:22:00
  发帖心情 Post By:2014/9/20 15:02:00 [显示全部帖子]

传上去了吗

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


加好友 发短信
等级:幼狐 帖子:144 积分:1107 威望:0 精华:0 注册:2014/6/1 10:22:00
[求助]例如图  发帖心情 Post By:2014/9/20 15:12:00 [显示全部帖子]

当规格为3克时,购进量除以100,当规格为3克*10袋时,购进量除以10,请老师指点

图片点击可在新窗口打开查看此主题相关图片如下:例如.png
图片点击可在新窗口打开查看




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


加好友 发短信
等级:幼狐 帖子:144 积分:1107 威望:0 精华:0 注册:2014/6/1 10:22:00
  发帖心情 Post By:2014/9/20 16:32:00 [显示全部帖子]

BIN老师,我这个是要写在按钮里的,如果写在表属性里,它会除好几次的。

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


加好友 发短信
等级:幼狐 帖子:144 积分:1107 威望:0 精华:0 注册:2014/6/1 10:22:00
  发帖心情 Post By:2014/9/22 9:33:00 [显示全部帖子]

我的Foxtable里至少有7张表,datacol change事件里也有内容,所以我想用按钮实现。

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


加好友 发短信
等级:幼狐 帖子:144 积分:1107 威望:0 精华:0 注册:2014/6/1 10:22:00
  发帖心情 Post By:2014/9/22 10:43:00 [显示全部帖子]

 下载信息  [文件大小:   下载次数: ]
点击浏览该文件:例子.rar

我想实现所有为3克的规格,购进量除以100,所有为3克*10小袋的规格,购进量除以10。应该怎么改BIN老师?


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