- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助]使用了皮肤功能后，如何去掉主菜单上新出现一条黑道？ (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=63663)
-- 发布时间：2015/1/26 4:44:00
-- [求助]使用了皮肤功能后，如何去掉主菜单上新出现一条黑道？
使用了皮肤功能后，主菜单上新出现一条黑道，见图：
此主题相关图片如下：出现黑道.jpg
怎么去掉呢？谢谢
-- 发布时间：2015/1/26 8:01:00
--
http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=56908
自己菜单设计和皮肤 两者不能共存吧
-- 发布时间：2015/1/26 8:29:00
--
可以共存，效果就变成了1楼那样了，出一道黑条。
-- 发布时间：2015/1/26 8:32:00
--
就是说出现黑条,不能共存. 你隐藏黑条,就会隐藏掉你自己设计的菜单
-- 发布时间：2015/1/26 8:56:00
--
那个皮肤是叠加，不是替代，所以就“多”出来了。
-- 发布时间：2015/1/26 9:18:00
--
那就试试这样
ApplicationMenu.visible = False
-- 发布时间：2015/1/26 15:14:00
--
使用
ApplicationMenu.visible = False 把下图红圈部份隐藏了，但是黑带仍然存在！
此主题相关图片如下：菜单显示.jpg
-- 发布时间：2015/1/26 15:21:00
--
那就试试，不行就没办法。
ApplicationMenu.visible = False
QAT.Visible =False
-- 发布时间：2015/1/26 15:26:00
--
运行
ApplicationMenu.visible = False
QAT.Visible =False
结果是
此主题相关图片如下：aa1.jpg
还是不行! 非常感谢 甜 &bin
-- 发布时间：2015/1/26 15:27:00
--
语句放到了AfterOpenProject
事件最后部份如下：
Forms("登陆窗口").Open()
Dim pf As String= ProjectPath & "皮肤_QQ2009_窄_底边.she" \'皮肤_清爽蓝色.she"
SkinH_AttachEx(pf,"")
ApplicationMenu.visible = False
QAT.Visible =False
这样设置对不对呢？