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 1097 korisnika na forumu :: 92 registrovanih, 10 sakrivenih i 995 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

Najviše korisnika na forumu ikad bilo je 3466 - dana 01 Jun 2021 17:07

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: 015, _Rade, acov34, Areal84, arezina, Asteker, Avalon015, Azzo, Ba4e, babaroga, Banovo Brdo, bojan581, boromir, Bosnjo, bpvl, Bubimir, Centauro, Cian, Clouseau, cyprus, daedal, debeli, Dioniss, Dorcolac, dozorni, dukajov, Dzoni2412, Electron, GAGI, GeoM, Gogi_avio, Goran_, icemilos, Inner-Cell, ivan1973, ivan_8282, Jonbonjovi, JosipRi, Još malo pa deda, Kawasaki1000, kenny74, Kobrim, Kubovac, kunktator, kuntalo, Lester Freamon, Lucije Kvint, M74AB3, Mackomen, Malahit, markolopin, marsovac 2, Miki 24pbr, miki kv, Milan A. Nikolic, milenko crazy north, mm1811, monomah, neutrino, Nobunaga, nobutado, novator, Parker, pisac12, PlayerOne, Povratak1912, predragc, PrincipL, proka89, RAKITNICA, raptorsi, repac, Ripanjac, Sagotolio, sixpac, Srki98, stankolich, stokssone, tehnika, tomigun, Trpe Grozni, Tunguska55, ujke, vathra, Vatreni Zmaj, voja64, vuksa72, W123, XBMC, yiyi, YugoSlav, zmajbre