Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共16 条记录, 每页显示 10 条, 页签: [1] [2]
[浏览完整版]

标题:窗口计算

11楼
admin22327 发表于: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楼
有点蓝 发表于:2024/5/6 15:58:00
“项目”是要删除的页面名称,比如"银行对账单对账信息";“打开”是要删除的任务的名称,比如要删除"银行对账单对账信息"里的【本次对账通过】

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

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

13楼
admin22327 发表于:2024/5/6 16:43:00
 好了,谢谢,还有我上传的那个文件的代码帮我写一下哈,谢谢
14楼
有点蓝 发表于:2024/5/6 16:50:00
代码在10楼项目里
15楼
admin22327 发表于:2024/5/6 17:13:00
 不好意思,文件打不开,请把代码直接发我一下
16楼
有点蓝 发表于:2024/5/6 17:24:00
更新foxtable到最新版就可以打开了
共16 条记录, 每页显示 10 条, 页签: [1] [2]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .01953 s, 2 queries.