@Xlithan: > You don't just change the command string, you need to change these values: > > If Left$(ChatText, **3**) = "/p " Then > ChatText = Mid$(ChatText, **4**, Len(ChatText) - **3**) So how do i know what to change the values to? sorry i'm new to this :/ Edit: Like this? :O ``` ' Player message If Left$(ChatText, 1) = "!" Then ChatText = Mid$(ChatText, 2, Len(ChatText) - 1) Name = vbNullString ' Get the desired player from the user text For i = 1 To Len(ChatText) If Mid$(ChatText, i, 1) Space(1) Then Name = Name & Mid$(ChatText, i, 1) Else Exit For End If Next ' Make sure they are actually sending something If Len(ChatText) - i > 0 Then ChatText = Mid$(ChatText, i + 1, Len(ChatText) - i) ' Send the message to the player Call PlayerMsg(ChatText, Name) Else Call AddText("Usage: !playername (message)", AlertColor) End If MyText = vbNullString frmMain.txtMyChat.text = vbNullString Exit Sub End If ```