Kako da se dugme samo pritisne... :)

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Pravim neki program i zanima me kako mogu da postavim jedan tajmer i
dugme ... i da posle nekog odredjenog vremena dugme se samo pritisne...?

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Ja bih to ovako uradio:
Prvo deklarises promenljivu BrojacSekunde

Private BrojacSekunde As Integer = 0

Postavis timer1 i kazes u svojstvu:
Interval=1000
Enabled=True

I u tajmeru napises sledeci kod:

BrojacSekunde = (BrojacSekunde + 1)
If BrojacSekunde = 5 Then ' Napisi umesto "5" posle koliko sekundi hoces da ti se aktivira dugme
>>Ovde treba da bidne kod koji pises za dugme<<
End If

Dopuna: 27 Jan 2009 20:51

Shvatio????

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

@Slavko
I gde tu u tvom kodu pozivas pritiskanje nekog dugmeta sa forme?

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Ne znam za VB6, ali u .NETu postoji button.PerformClick().

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Pa u tajmeru pises kod koji treba da napises u dugme

If BrojacSekunde = 5 Then ' Napisi umesto "5" posle koliko sekundi hoces da ti se aktivira dugme
>>Ovde treba da bidne kod koji pises za dugme<<
End if
Tako da ti tajmer pokrene taj kod

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Dim Sekunde as integer Form_Load() Sekunde = 0 End Sub Timer1.Timer() Sekunde = Sekunde + 1 If Sekunde = 10 then CommandButton_Click End If End Sub

Gde pise Sekunde = 10 tu stavi posle koliko sekunde da se pritisne. Tajmer stavi na Enabled = True i postavi interval na (priblizno) jednoj sekundi tj 1000. Kod sam pisao bez vb tj nisam radio dok sam pisao. Srecno

Ako 'oces da se ponavlja svake pet sekunde onda dodaj ovo :

Timer1_Timer() Sekunde = Sekunde + 1 If Sekunde = 10 then CommandButton_Click S = 0 End If End Sub

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Uloguj se preko Facebooka da bi skinuo fajl:

Ne moze tako. Kod koriscenja tajmera preko svojstva interval se ukljucuje iskljucuje tajmer(kada je nula se iskljucuje). Svojstvo interval je u milisekundama tako da je 1000 milisekundi jedna sekunda.
Dogadjaj clik dugmeta je u stvari metoda i moze se kao i svaka metoda pozvati ali posto je to privatni dogadjaj forme moze se pozvati samo iz te forme sa Call Command1_Click.

Mnogo je bolje definisati unutar modula sa Public Sub procedura, neku javnu proceduru, koju mozemo pozvati i u okviru dogadjaja dugmeta ali i bilo gde i iz bilo koje forme. U praksi je ovo mnogo bolje i treba izbegavati pozive dogadjaja kontrola jer su private.


Private Sub Command1_Click()     'Neke komande End Sub Private Sub Form_Load()     'Za jednu sekundu     Timer1.Interval = 1000 End Sub Private Sub Timer1_Timer()     Static DugmeJePritisnuto As Boolean     If DugmeJePritisnuto = False Then         DugmeJePritisnuto = True         Call Command1_Click         Print "Prosla je jedna sekunda, automatski je pritisnut je command1."     End If End Sub

[Link mogu videti samo ulogovani korisnici]

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Jovanovic Slavko ::Pa u tajmeru pises kod koji treba da napises u dugme

If BrojacSekunde = 5 Then ' Napisi umesto "5" posle koliko sekundi hoces da ti se aktivira dugme
>>Ovde treba da bidne kod koji pises za dugme<<
End if
Tako da ti tajmer pokrene taj kod
Pao bi na ispitu kod vecine profesora ukoliko pises kod tako da ti se jedan te isti kod ponavlja na vise mesta.
Ako je neki kod vec pisan u Click metodi nekog dugmeta, onda jedino sto treba je da pozove click metodu tog dugmeta, a ne da duplira kod.