- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 控件展开与回收 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=184514)
-- 发布时间：2022/12/11 21:09:00
-- 控件展开与回收
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目6.foxdb |
蓝总：晚上好
button控制Panel展开，但是打开的顺序不对，不知道哪里有问题。
-- 发布时间：2022/12/11 22:20:00
--
搞那么复杂干什么。把按钮和panel的名称对应起来就行了，比如按钮1名称为button1，对应要显示的panel就设置名称为panel1。
以此类推，button2对应panel2....
click事件
if e.sender.name like "Button*" then
dim p as winform.panel = e.form.controls("Panel" & e.sender.name.replace("Button",""))
p.visible = not p.visible
end if