Foxtable(狐表)用户栏目专家坐堂 → 窗口计算


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

主题:窗口计算

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


加好友 发短信
等级:幼狐 帖子:172 积分:1998 威望:0 精华:0 注册:2017/12/20 8:56:00
  发帖心情 Post By:2024/5/6 15:45:00 [只看该作者]

Dim cnt3 As Integer = DataTables("银行对账单").Compute("Count(_Identify)","对账 = True ")
Dim cnt4 As Integer = DataTables("银行对账单").Compute("Count(_Identify)","对账 = False ")
Page = e.Form.Controls("TopicBar1").Pages.Add("银行对账单对账信息","银行对账单对账信息")
Page.Links.Add("本次对账通过","本次对账通过(" & cnt3 & ")" )
Page.Links.Add("本次对账不通过","本次对账不通过(" & cnt4 & ")" )

通过按钮,移除窗口的的这个信息,按您提供的帮助看了,
With Forms("窗口1").Controls("TopicBar1").Pages("项目")

    .Links.Remove(.Links("打开"))
End
 
With

 还是不会做,帮我写一下,不知道“项目”和“打开”什么意思,谢谢
[此贴子已经被作者于2024/5/6 15:46:10编辑过]

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


加好友 发短信
等级:超级版主 帖子:107014 积分:544295 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/5/6 15:58:00 [只看该作者]

“项目”是要删除的页面名称,比如"银行对账单对账信息";“打开”是要删除的任务的名称,比如要删除"银行对账单对账信息"里的【本次对账通过】

With e.Form.Controls("TopicBar1").Pages("银行对账单对账信息")

    .Links.Remove(.Links("本次对账通过"))
End
 
With


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


加好友 发短信
等级:幼狐 帖子:172 积分:1998 威望:0 精华:0 注册:2017/12/20 8:56:00
  发帖心情 Post By:2024/5/6 16:43:00 [只看该作者]

 好了,谢谢,还有我上传的那个文件的代码帮我写一下哈,谢谢

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


加好友 发短信
等级:超级版主 帖子:107014 积分:544295 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/5/6 16:50:00 [只看该作者]

代码在10楼项目里

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


加好友 发短信
等级:幼狐 帖子:172 积分:1998 威望:0 精华:0 注册:2017/12/20 8:56:00
  发帖心情 Post By:2024/5/6 17:13:00 [只看该作者]

 不好意思,文件打不开,请把代码直接发我一下

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


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

更新foxtable到最新版就可以打开了

 回到顶部
总数 16 上一页 1 2