-
VB6.0 创建右键菜单实例.rar下载
资源介绍
VB6.0 创建一个右键菜单,为了便于用户使用“粘贴”功能,特此自定义了一个右键菜单,在这个右键菜单中用户可选择粘贴,直接从剪帖板中粘贴内容到本窗口中。以下是相关的代码:
Private Sub Picture1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 2 Then
Me.PopupMenu config
End If
End Sub
Private Sub plaster_Click()
Picture1.Picture = Clipboard.GetData
End Sub
Private Sub clear_Click()
Picture1.Picture = LoadPicture()
End Sub