MyCity » Visual Studio » Timer me nesto zeza...

Timer me nesto zeza...

Napisano na dan: 14.1.2009

Timer me nesto zeza...
Sledeća strana Pagination

Idi na vrh

Poslao: 14 Jan 2009 19:00
Idi na vrh
offline
  • Pridružio: 26 Okt 2008
  • Poruke: 1560
  • Gde živiš: Sremski Mihaljevci

Imam jedan problem sa tajmerom.

napisao sam ovaj kod za tajmer:

Private Brojacstatuslabel As Integer = 0 ' Deklarisao sam Brojacstatuslabel             Dim nazivservisa As New System.IO.StreamReader("C:\Program Files\EVUS\EVUS\Baze\Imeservisa.EVUS") 'Fajl sto se cita         ToolStripStatusLabel.Text = "EVUS " + """" + nazivservisa.ReadToEnd + """"         Brojacstatuslabel = (Brojacstatuslabel + 1)         If (Brojacstatuslabel = 15) Then             ToolStripStatusLabel.Text = "EVUS " + """" + nazivservisa.ReadToEnd + """"         End If

a ovo sam stavio u svako dugme, ima sada tu vise dugmica ali evo kod iz jednog:

 Brojacstatuslabel = 0         ToolStripStatusLabel.Text = "Pregled vozila"         Form1.MdiParent = Me         Form1.Show()

E ovaj kod je nekada radio i sada nece. Kada kliknem dugme pise "Pregled vozila na pola sekunde i pojavi se Dim nazivservisa As New System.IO.StreamReader("C:\Program Files\EVUS\EVUS\Baze\Imeservisa.EVUS")

Interval sam postavio na 350 a enabled na true

Ranije dok je taj kod radio bilo je oko 10 sec "Pregled vozila" pa se pojavi onaj fajl a sad nece da radi. hajde mi recite u cemu je problem, ako znate!

Dopuna: 14 Jan 2009 19:00

R E S E N O ! ! !

Dim nazivservisa As New System.IO.StreamReader("C:\Program Files\EVUS\EVUS\Baze\Imeservisa.EVUS") 'Fajl sto se cita ToolStripStatusLabel.Text = "EVUS " + """" + nazivservisa.ReadToEnd + """" Brojacstatuslabel = (Brojacstatuslabel + 1) If (Brojacstatuslabel = 15) Then ToolStripStatusLabel.Text = "EVUS " + """" + nazivservisa.ReadToEnd + """" End If

A ispravno je ovako:

Dim nazivservisa As New System.IO.StreamReader("C:\Program Files\EVUS\EVUS\Baze\Imeservisa.EVUS") 'Fajl sto se cita Brojacstatuslabel = (Brojacstatuslabel + 1) If (Brojacstatuslabel = 15) Then ToolStripStatusLabel.Text = "EVUS " + """" + nazivservisa.ReadToEnd + """" End If

Mora da sam greskom dodao taj red. Kome jos ta linija koda treba... Smile



Registruj se da bi učestvovao u diskusiji. Registrovanim korisnicima se NE prikazuju reklame unutar poruka.
Poslao: 16 Jan 2009 02:39
Idi na vrh
offline
  • Pridružio: 28 Jun 2004
  • Poruke: 990
  • Gde živiš: Kucura

Moze li ovo u code tagove? Smile



MyCity » Visual Studio » Timer me nesto zeza...

Ko je trenutno na forumu
 

Ukupno su 1744 korisnika na forumu :: 70 registrovanih, 4 sakrivenih i 1670 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

Najviše korisnika na forumu ikad bilo je 4695 - dana 26 Nov 2025 23:09

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: 100jan, A.R.Chafee.Jr., advokat84, annon, ArmFPGA, babaroga, Bivan, Bo96, BraneS, bukefal, ccoogg123, cole77, darionis, djonsule, DonRumataEstorski, Dr.Strangelove, DrNeoCortex, DuškoMraz, Georgius, Giskard, Haris, Iskander, Jakonjveliki, jalos, Još malo pa deda, kalens021, kenny74, Koce, kolle.the.kid, Kruger, Lester Freamon, Manjane, markolopin, mercedesamg, Mercury, mikrimaus, Milovan Dinic, milutin134, Mitogna, mmelezovic, morava_01, nekdo, neko_drugi, Neutral-M, nnovakis, orah, Paklenica, panzermilan45, pein, Pero, pobeda, Povratak1912, raf87, raketaš, raso76, redstar011, samocitam, sasics, stevo svinja, Stoilkovic, takini, tamno.nebo, tiho76, USSVoyager, vojnik švejk, Vrač, yiyi, zzapNDjuric99, Žukov, 127