Problema con "Str2digits"

[suibaf]

Questo codice funziona bene:

Code: Select all

Dim Digit(4) As Byte
Dim Num_str As String * 10

Do

   If Pls_shield = 1 Then

      Waitms 500

      Testint = 123

      Num_str = Str(testint)

      Str2digits Num_str , Digit(1)

       Locate 4 , 11

       Lcd Num_str
       Print Num_str

   End If

loop



sul display lcd vedo 123.
Se la variabile Testint la setto a 1234 sul display lcd al posto dell'uno vedo un carattere strano. Perchè?
Grazie

[deluca]

@suibaf

risolto tramite mcs,
o hai bisogno ancora di aiuto?

[suibaf]

Risolto,
garzie!