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
