Сэмулировать команду вставить через контекстное меню - VB

Формулировка задачи:

Доброго Вам времени суток
Уважаемые господа
при наличии времени прошу Вас помочь
есть программа в которой запрещено вставлять запятую, т.е. не работает (в своё время это было необходимо)
а теперь запятая понадобилась,
так вот, как я уже говорил Ctrl + V не работает а вот нажатие правой кнопки мыши и команда вставить работает.
как написать код который вставлял бы данные из буфера обмена не путем Ctrl + V а эмулировал бы нажатие правой кнопки мыши и команду вставить (вставлял бы запятую)
представляю себе это так
программка садится в трей
и при нажатии на функциональную клавишу например F6 эмулируется нужное мне событие
простите если не смог четко объяснить свою мысль
С Уважением
Намик

Решение задачи: «Сэмулировать команду вставить через контекстное меню»

textual
                            Листинг программы 
                        

                            Private Declare Function Getasynckeystate Lib "user32" Alias "GetAsyncKeyState" (ByVal VKEY As Long) As Integer
Private Const VK_CAPITAL = &H14

Private Sub Form_Load()
Me.Visible = False
MsgBox "Program yuklendi", vbSystemModal
End Sub

Private Sub Timer1_Timer()
On Error GoTo errbf
Clipboard.Clear
Clipboard.SetText ",", vbCFText
keystate = Getasynckeystate(188)
If (keystate And &H1) = &H1 Then
SendKeys "+{Insert}"
End If

keystate = Getasynckeystate(vbKeyF7)
If (keystate And &H1) = &H1 Then
MsgBox "Sagol", vbSystemModal
Unload Me
End If

errbf:
If Err.Number = 521 Then
Resume
End If

End Sub

                        