این هم دستور budy/ که قولش رو داده بودم
باید توی سویچ help/ هم دستور اضاف کنید . خودتون دیگه باید اینو بلد باشید
کد زیرو توی frmMain زیر کد gf/ کپی کنید
ElseIf Left(Message, 5) = "/budy" Then
txtPersonID.Text = Trim(Replace(Mid(Message, 7), " ", "+"))
txtMessage.Text = "salam, KHoobi :X, azizam <green>" & PersonID & "</green> Gofte khodamo behet MOarefi KOnam ke Az emkanatam Estefade KOni
<green> /help </green> bezan ta bebini chikara baladam "
sendData SendPm(tUser.Text, txtPersonID.Text, txtMessage.Text)
txtMessage.Text = " "
txtPersonID.TabIndex = " "
Response = "Mersi KE mano BE Doostet Moarefi Kardi
"