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 3889 korisnika na forumu :: 71 registrovanih, 4 sakrivenih i 3814 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: A.R.Chafee.Jr., AleksM, alex71, Apok, ArmFPGA, Asparagus, awathorn, bufanje, cenejac111, Chainsaw, Cirkon, cojapop, Colt D, curuzan, Dare, deks, DonRumataEstorski, Dzambas, Gaga_89, GeoM, Gitzherai, gobrad, Goga, GT, GveX, ILGromovnik, Imperator_Aleksandr_lll, IpMan, Jager715510, Jovan1983, kaisarevic1, knutveliki, Koca Popovic, kozhedub, leopard83, Lep1na, Leteća Krofna, Limeni91, mig21, miki kv, Milan A. Nikolic, MiljanXD, MilosKop, Moldovan, Mzee, nikolapetkovic, nixos, Njubara, nsharambasa, padamacki, pein, Permaldar, pirke96, raster12, Ray1973, ruma, S-lash, SamoGledam, samsung, Sonic, srđan, StalniPromatrač, stefan95, The Boss, Tihi86, Valter071, Vanderx, Vaske8990, Vlad000, VP6919, vrgudinac