作者BlueIceBeer (铜雀春深锁二乔)
看板Visual_Basic
标题Re: [VB6 ] 按下滑鼠右键跳出的视窗
时间Mon Aug 1 00:28:35 2005
※ 引述《idleidle (MP3随身碟眼花嘹乱~~)》之铭言：
: 我想写一个视窗
: 就是按下滑鼠右键跳出的视窗
: 请问有现成的物件可以去修改吗？
: 不太想用Form去改
: 谢谢
: 嗯嗯，我再试者表达一次
: 按下滑鼠右键後
: 会跳出一个视窗
: 上面有剪下、复制、贴上等功能
: 我指的就是那个视窗
: 请问有没有类似的元件可以使用呢？
: 我想模拟那个跳出来的视窗
: 除了剪下、复制、贴上之外并且新增一些功能
那个东西好像不能叫做视窗。
制作方法如下：
1.用 功能表编辑器 做出一个 menu。请让它看不见(Visible=False)。
2.程式码加入这一段：
Private Sub Form_MouseDown (Button As Integer, Shift As Integer, X As Single,
Y As Single)
If Button = 2 Then
PopupMenu MyMENU
End If
End Sub
亦即 按下滑鼠右键，就蹦现功能表。
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 61.30.185.247
1F：→ idleidle:成功了...谢谢^^ 218.168.16.165 08/01