这样可以实现你需要的功能:
'add a timer control to form1,then add the following codes
'copy any text to clipboard for some times,then press ^v and watch your form1
Dim x As New Collection
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyV And Shift = 2 Then
If x.Count = 0 Then
Exit Sub
Else
Print x(1)
x.Remove 1
End If
End If
End Sub
Private Sub Form_Load()
Timer1.Interval = 100
Timer1.Enabled = True
Me.KeyPreview = True
End Sub
Private Sub Timer1_Timer()
If Clipboard.GetText > "" Then
x.Add Clipboard.GetText
Clipboard.Clear
End If
End Sub