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 2587 korisnika na forumu :: 70 registrovanih, 8 sakrivenih i 2509 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

Najviše korisnika na forumu ikad bilo je 20624 - dana 04 Apr 2026 04:18

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: ajo baba, aleph_one, ArchaBasha, Avladi, blatruc82, bojcistv, bokicacar, bolimejoli, Cirkon, dano, dearg, dejan.7951, Denaya, Dimitrise93, dj.ape, draganl, dule10savic, duro1990duro, Dzoni2412, Džekson, EVIDENTICAR, gajca1977, goranvas, GveX, ILGromovnik, Jonbonjovi, Jovan1983, kenny74, komenski, Magarac, mercedesamg, mikoyan21, mikrimaus, Milan A. Nikolic, milanstankovic087, mir juzni, Mrav Obrad, nebkv, Nemanja.M, nemkea71, nenooo, Niki2024, nikoli_ca, nixos, Nobunaga, nuke92, Oscar2, Peruta, raf87, royst33, SamoGledam, sasovsky, shaja1, Sirius, Sonic, Srki98, ss10, sspp, stegonosa, tomigun, Troja, Username1000, varda, vathra, veljkovicdani, Vojkan Petrovic, Volfero, vzd1389, ZetaMan, Zoran1959