AT command for sending SMS through GSM Modem.

'for writing sms '.Write("AT+CMGF=1" + vbCrLf) cescQuote = Char.ConvertFromUtf32(34) sphnPhoneNo = "+914567352312" atcCommand = "AT+CMGS=" + cescQuote + sphnPhoneNo + cescQuote + vbCrLf + "WORLD" + Char.ConvertFromUtf32(26) ' .Write(atcCommand + vbCrLf) .WriteLine(atcCommand + vbCrLf) TextBox1.Text = .ReadExisting() .DiscardOutBuffer() .Close()