www.elektronik.si Seznam forumov www.elektronik.si
Forum o elektrotehniki in računalništvu
 
 PomočPomoč  IščiIšči  Seznam članovSeznam članov  SkupineSkupine  StatisticsStatistika  AlbumAlbum  DatotekeFilemanager DokumentacijaDocDB LinksPovezave   Registriraj seRegistriraj se 
  PravilaPravila  LinksBolha  PriponkePriponke  KoledarKoledar  ZapiskiZapiski Tvoj profilTvoj profil Prijava za pregled zasebnih sporočilPrijava za pregled zasebnih sporočil PrijavaPrijava 

COM port in Visual Basic
Pojdi na stran Prejšnja  1, 2, 3
 
Objavi novo temo   Odgovori na to temo   Printer-friendly version    www.elektronik.si Seznam forumov -> Programska oprema
Poglej prejšnjo temo :: Poglej naslednjo temo  
Avtor Sporočilo
Obelix
Član
Član



Pridružen-a: Pon 19 Maj 2008 13:59
Prispevkov: 1881
Aktiv.: 9.02
Kraj: Maribor

PrispevekObjavljeno: Čet Nov 06, 2008 2:48 pm    Naslov sporočila:   Odgovori s citatom

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
Odsoten Poglej uporabnikov profil Pošlji zasebno sporočilo
toncibalonci
Član
Član



Pridružen-a: Pet 03 Avg 2007 21:12
Prispevkov: 331
Aktiv.: 1.52
Kraj: Dravograd

PrispevekObjavljeno: Čet Nov 06, 2008 3:09 pm    Naslov sporočila:   Odgovori s citatom

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
Odsoten Poglej uporabnikov profil Pošlji zasebno sporočilo
Obelix
Član
Član



Pridružen-a: Pon 19 Maj 2008 13:59
Prispevkov: 1881
Aktiv.: 9.02
Kraj: Maribor

PrispevekObjavljeno: Čet Nov 06, 2008 3:54 pm    Naslov sporočila:   Odgovori s citatom

Potem pa pretvori Stevec v String.

x = Str(Stevec)
Nazaj na vrh
Odsoten Poglej uporabnikov profil Pošlji zasebno sporočilo
Pokaži sporočila:   
Objavi novo temo   Odgovori na to temo   Printer-friendly version    www.elektronik.si Seznam forumov -> Programska oprema Časovni pas GMT + 2 uri, srednjeevropski - poletni čas
Pojdi na stran Prejšnja  1, 2, 3
Stran 3 od 3

 
Pojdi na:  
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