Sim800 için mesaj atılacak numarayı değişkenden almak.?

[mustafa_cmbz]

Merhabalar.

Sim800 ile ufak bir SMS uygulaması yapan bir kartım var. Bu kartta nextion ekranda mevcut.

Yapmak istediğim mesaj atmak istediğim numarayı ekrandan değiştirebilmek istiyorum.

HSerOut2 ["AT+CMGS=","+905427194859",13,"MERHABA CAMBAZ,NABER NASILSIN",26,13

Bu kısımdaki numarayı Sim800 e nasıl bir değişkene atıp nasıl gönderebilirim?

Muhtemel string şeklinde olacak ama her numarayı tek tek mi yoksa bir kerette mi yazmam gerekli?

[power20]

Gönderim öncesi ekranda MyArray içeriği değiştirilmeye çalışılsın.

Dim MyArray[13] as Byte  
MyArray [0] = "+" ' Load the first 5 bytes of the array
MyArray [1] = "9" ' With the data to send
MyArray [2] = "0"
MyArray [3] = "5"
MyArray [4] = "4"
MyArray [4] = "2"
...
MyArray [12] = "9"


HSerOut2 ["AT+CMGS=",Str MyArray\13,13,"MERHABA CAMBAZ,NABER NASILSIN",26,13

 

[fofo]

  Dim  TEL As String *11
   TEL="05XXXXXXXXX"
 HSerOut ["at+cmgs=",34,TEL,34,13]                 
   HSerOut ["MERHABA CAMBAZ,NABER NASILSIN",26]