关于窗体显示的小问题,请教原因。

lyphb 2003-08-26 03:46:28
我想显示一个无边框的窗体,设置了窗体属性controlbox=false,borderstyle=0,运行后正确显示,没有边框。我在窗体中添加了一些菜单项,问题出现了,运行后,窗体出现了边框,呵呵,很奇怪,不知道为什么?
...全文
40 8 打赏 收藏 转发到动态 举报
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
lyphb 2003-08-26
  • 打赏
  • 举报
回复
结贴了,如果有其他更好的方法,大家可以继续,我会另外开贴送分的。
其实我结贴很快的,一般不超过半天,可我的信誉分为什么被扣了5分,后来才知道,原来是以前曾经帖过一个招聘启事,我冤啊,怎么才能得到信誉分啊,谁给我点,呵呵。:)
lyphb 2003-08-26
  • 打赏
  • 举报
回复
其实我用的就是popupmenu,弹出右键菜单,窗体上没有主菜单的。
看来菜单只能在另外的窗体里设置了,我试过了,可以的。
谢谢各位。
自己画菜单也应该可以吧,我试一下。
不知道还有没有其他的好方法?
lihonggen0 2003-08-26
  • 打赏
  • 举报
回复
不加菜单就没事!
liul17 2003-08-26
  • 打赏
  • 举报
回复
若还是不行可与我联系: liul@wmcssoft.com
liul17 2003-08-26
  • 打赏
  • 举报
回复
画2个窗体 form1 form2 ,其中form1为你所描述的窗体(无...) ,在上面画个 toolbar 样式设为 flat ,form2 中新建一个菜单名为 p 下面有一些子菜单, 新然后将下面代码粘到 form1中即可,应该是你要的吧

Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)
PopupMenu Form2.p
End Sub
道素 2003-08-26
  • 打赏
  • 举报
回复
用popupmenu在窗体上自定义菜单显示位置
Private Sub Label1_Click()
PopupMenu MenuTest
End Sub
道素 2003-08-26
  • 打赏
  • 举报
回复
用popupmenu在窗体上自定义菜单显示位置
Private Sub Label1_Click()
PopupMenu MenuTest
End Sub
chutianqi 2003-08-26
  • 打赏
  • 举报
回复
这个问题我也出现过,好像是在没有边框的窗体上不能添加菜单,你可以添加一个窗体把菜单放在上面,通过程序把菜单显示成下拉菜单

7,789

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧