Foxtable(狐表)用户栏目专家坐堂 → 按钮填入数据


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

主题:按钮填入数据

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


加好友 发短信
等级:九尾狐 帖子:2701 积分:17999 威望:0 精华:0 注册:2013/4/9 10:41:00
按钮填入数据  发帖心情 Post By:2019/5/19 18:56:00 [只看该作者]

老师,如果点击按钮,窗口1的表1的第一列的为不0的行改为0怎么写呀,
比如,第一列不是0,就改为0,如果第一行是0,就判断这一列不为0的第一行,然后改为0,感谢 感谢 

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


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

 

DataTables("表A").replacefor("第一列", 0)

 


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


加好友 发短信
等级:九尾狐 帖子:2701 积分:17999 威望:0 精华:0 注册:2013/4/9 10:41:00
  发帖心情 Post By:2019/6/2 20:36:00 [只看该作者]

感谢 老师  ,为什么会显示没有窗口表呢,感谢 感谢 
DataTables("财务汇总窗口_Table26").replacefor("负债_变累", 0)

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


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

那你改成

 

Tables("财务汇总窗口_Table26").datatable.replacefor("负债_变累", 0)
 

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


加好友 发短信
等级:九尾狐 帖子:2701 积分:17999 威望:0 精华:0 注册:2013/4/9 10:41:00
  发帖心情 Post By:2019/6/6 22:42:00 [只看该作者]

谢谢,这个给可以是不是0的第一行为0吗?不是整列。感谢 ,比如一行不是0就改为0,如果第一行是0.就把这一列不为0的行改为0,感谢 感谢

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


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

没看懂,截图说明一下

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


加好友 发短信
等级:九尾狐 帖子:2701 积分:17999 威望:0 精华:0 注册:2013/4/9 10:41:00
  发帖心情 Post By:2019/6/23 23:39:00 [只看该作者]

老师,就是把变动列不为0的第一行改为0,现在不未0的第一行是第三行246,改为0,
如果第三行为0,则就把228.55改为0,就是在原来的基础上,把本来不是0的第一行改为0感谢 感谢 
比如点击按钮查看 变动列那行第一个(系统序号顺序)不0 然后把这行改为0.如果一行都没有,那就是第一行改为0,感谢 感谢 

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


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


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

 

Dim i As Integer = Tables("表A").findrow("变动 <> 0")

Tables("表A").Rows(i)("变动") = 0

 

 


 回到顶部