Rss & SiteMap

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

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

标题:如何对手动点击tab进行代码编辑?

1楼
lur320 发表于:2025/2/7 9:45:00
 在某一个功能区的selectab里面有如下代码:
forms("xmu").open
maintable=tables(...)

然后每次启动都会直接跳到这个段代码。并非手动点击tab触发的。

在项目属性里面,和窗体相关的只有这一条。在afterprojectopen
MainTable = Tables("vshi")
Forms("登录").Open

在Forms("登录")的aftershow事件中,有如下代码
Dim itm As RibbonMenu.Tab
For Each itm In RibbonTabs
    itm.visible = False
Next

但是这个Forms("登录")登录界面不会自动显示,也可能显示的太快,只显示forms("xmu")


为何系统启动会自行依次选择所有tab?如何写代码使得手动点击才触发?
[此贴子已经被作者于2025/2/7 9:58:42编辑过]
2楼
有点蓝 发表于:2025/2/7 10:12:00
"登录"窗口改为模式窗口
3楼
lur320 发表于:2025/2/7 10:20:00
 不行,之前就一直采用模式窗口,但是主窗口其实并没有打开,windows下方的任务栏也看不到。员工如果桌面文件开的多,就容易找不到登录窗口。
4楼
lur320 发表于:2025/2/7 10:21:00
登录窗口就是先隐藏所有tab,然后密码正确后,再按照权限显示tab。这也会触发selecttab的事件?

5楼
有点蓝 发表于:2025/2/7 10:28:00
隐藏其它tab的时候,这个tab就会显示,就会处于选中状态,就会触发selecttab的事件

功能区的selectab里面代码:
if vars("登录")=false
forms("xmu").open
maintable=tables(...)
end if

afterprojectopen
vars("登录")=true
MainTable = Tables("vshi")
Forms("登录").Open

在Forms("登录")的aftershow事件中,有如下代码
Dim itm As RibbonMenu.Tab
For Each itm In RibbonTabs
    itm.visible = False
Next
vars("登录")=false
共5 条记录, 每页显示 10 条, 页签: [1]

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

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