在vb.net SKYPE4COMLib中检测skype名称

我正在尝试创建skypebot，但我一直在检测消息发送者的名字

就像我试图使命令像！帮助管理员。只有在管理员文本框中的人，他们的名字在上面才能使用它，比如如果他是，它会发出命令，如果不是，那么它只会打印类似“无法访问此命令”的内容

这差不多是我所做的。

最好用这个来寻求帮助。

    Private Sub skype_MessageStatus(ByVal msg As ChatMessage, ByVal status As TChatMessageStatus)
    Dim Trigger As String = "!"
    Dim BotName As String = "@PandyBot"
    Dim Message As String
    Try

        If status = TChatMessageStatus.cmsReceived Or status = TChatMessageStatus.cmsSent Then
            Message = msg.Body
            If Message.StartsWith(Trigger) Then
                Message = Message.Remove(0, 1)
                msg.Chat.SendMessage(BotName & ": " & ParseMessage(Message))
            End If
        End If


    Catch ex As Exception

    End Try
End Sub

Function ParseMessage(ByVal message As String) As String
    Dim msg As String = "Command not regonized!"
    Select Case message
        Case "test"
            msg = "Is working correctly"
        Case "help"
            msg = "use !help user or !help admin"
        Case "help admin"
            If 
                msg = "!poll, !jail, !murder, !ban"
            Else
                msg = " lol1"
            End If
        Case "help user"
            msg = "!test, !time, !date, !credits, secret"
        Case "date"
            msg = "Current Date is: " & DateTime.Now.ToLongDateString()
        Case "time"
            msg = "Current Time is: " & DateTime.Now.ToLongTimeString()
            Exit Select
    End Select
    Return msg
End Function