Не работает отправка SMS через PDU - VB

Формулировка задачи:

Через GSM модем отправляю смс. В текстовом режиме все нормально, но там латынь!!!

comm.Output = "AT+CMGF=1" & vbCrLf
comm.Output = "AT+CMGS=" & Chr(34) & "+79502159320" & Chr(34) & vbCrLf ' Г*Г®Г¬ГҐГ° ГІГҐГ«ГҐГґГ®Г*Г* (ГЄГ®Г¬Гі)
comm.Output = "ALARM:" & Time & Chr(26) & vbCrLf ' ГІГҐГЄГ±ГІ Г±Г®Г®ГЎГ№ГҐГ*ГЁГї

Хочется на русском. для этого перевожу в режим PDU:

comm.Output = "AT+CMGF=0" & vbCrLf
comm.Output = "AT+CMGS=31" & Chr(34) & vbCrLf
comm.Output = "07919730071111f101000b919705129523f0000812041a0420041004210410041204270418041A" & Chr(26) & vbCrLf

Ничего не отсылается???!!! Может в коде что-то не то??? Пробовал в HyperTerminal все отсылается: AT+CMGF=0 AT+CMGS=31 > 07919730071111f101000b919705129523f0000812041a0420041004210410041204270418041A ctrl+Z

Решение задачи: «Не работает отправка SMS через PDU»

textual
                            Листинг программы 
                        
                            comm.Output = "07919730071111f101000b919705129523f0000812041a0420041004210410041204270418041A" & Chr(26) & vbCrLf