按钮中的sub hearword（byval as skypecall）？

Question

我试图与Skype接口，我有一个示例代码

Imports HSPI_SKYPE

Sub HEARDWORD(ByVal c as SkypeCall)
    c.speaktextwait("you said" & c.lastwordRecognized)
End Sub

但我希望它在按钮内

Private Sub button20_click(sender as Object. e as EventArgs) Handles29.click
    Dim c as SkypeCall
    c.speaktextwait("you said" & c.lastwordRecognized)
End Sub

这不起作用。当我按下按钮时，如何让Skype重复上次听到的单词？