如何让没有标题栏的窗体右键弹出菜单? 就是 Form1 的属性 Borderstyle=0 时在窗体上鼠标诱奸单击弹出彩旦来?要是代码示例就太好了。先感谢拉!!! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 诱奸单击弹出彩旦-_-###这个问题好复杂!!!右键单击的话,你可以设置一个隐藏的菜单即enable属性为false的菜单然后在mouse_down那判断一下button是不是等于vbrightbutton.再用popupmenu函数填上你想要弹出的菜单名就行了.就行了如:popupmenu mnufile ,x,y 你把Caption删掉,然后ControlBox设为False,就啥标题栏都没有了 两个窗口,form1,form2form2里面添加菜单 menu form1里面Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)If Button = 2 ThenPopupMenu form2.Menu, 0, X, YEnd IfEnd Sub VB存储变量值到数据库 VB将程序本身关闭然后再重新运行后 窗体不弹到桌面 而是最小化! 整数转换二进制的问题! 问一个查询数据库的方法 怎么在SQL语句中使用日期值--急!在线等!.....即时给分! 谁能告诉我哪里有下载vb练习题的? ActiveX 文档间怎么传递参数(最好有原码,谢谢) 请问VB中实现对ACCESS2000数据库优化和修复的语句是怎样写的? 谁有链接数据库的资料?我出200分! 好象有个做XP风格的ACTIVEX控件,谁知道哪里有啊 现在开发的中小项目关于数据库编程方面的问题 输入的记录无法写入sql表
然后在mouse_down那判断一下button是不是等于vbrightbutton.再用popupmenu函数填上你想要弹出的菜单名就行了.就行了
如:popupmenu mnufile ,x,y
form2里面添加菜单 menu
form1里面
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 2 Then
PopupMenu form2.Menu, 0, X, Y
End If
End Sub