 |
www.elektronik.si Forum o elektrotehniki in računalništvu
|
Poglej prejšnjo temo :: Poglej naslednjo temo |
Avtor |
Sporočilo |
Obelix Član

Pridružen-a: Pon 19 Maj 2008 13:59 Prispevkov: 1881 Aktiv.: 9.02 Kraj: Maribor
|
Objavljeno: Čet Nov 06, 2008 2:48 pm Naslov sporočila: |
|
|
Ta varianta bi morala delati. Spremenljivke boš seveda priredil svojim potrebam.
Dim X0 As String * 4
Dim X1 As String * 4
Dim X2 As String * 5
X0 = "123" - to je tvoj "vhodni" niz
X1 = " "
X2 = X1 + X0
X2 = Right(x2 , 5) - to je pa "izhodni" niz
Print X2
End |
|
Nazaj na vrh |
|
 |
toncibalonci Član

Pridružen-a: Pet 03 Avg 2007 21:12 Prispevkov: 331 Aktiv.: 1.52 Kraj: Dravograd
|
Objavljeno: Čet Nov 06, 2008 3:09 pm Naslov sporočila: |
|
|
To verjetno deluje ampak jaz nimam številčnega niza ampak spremenljivko stevec,to pa ne gre.Takole,stevec mora biti fiksne dolžine.
$baud = 4800
Dim Stevec As Byte
Stevec = 0
Do
Debounce P3.2 , 0 , Stej , Sub
Loop
Stej:
Incr Stevec
Print Stevec
Return |
|
Nazaj na vrh |
|
 |
Obelix Član

Pridružen-a: Pon 19 Maj 2008 13:59 Prispevkov: 1881 Aktiv.: 9.02 Kraj: Maribor
|
Objavljeno: Čet Nov 06, 2008 3:54 pm Naslov sporočila: |
|
|
Potem pa pretvori Stevec v String.
x = Str(Stevec) |
|
Nazaj na vrh |
|
 |
|
|
Ne, ne moreš dodajati novih tem v tem forumu Ne, ne moreš odgovarjati na teme v tem forumu Ne, ne moreš urejati svojih prispevkov v tem forumu Ne, ne moreš brisati svojih prispevkov v tem forumu Ne ne moreš glasovati v anketi v tem forumu Ne, ne moreš pripeti datotek v tem forumu Ne, ne moreš povleči datotek v tem forumu
|
Uptime: 9 dni
Powered by phpBB © 2001, 2005 phpBB Group
|