Visual basic 2008 Screen Saver

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

Da li neko zna kako da namestim da, ako se na programu ne aktivira ni jedno dugme u roku od 15 sec. da mi otvori form2. da mi form2 bude kao Sceen Saver.

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

A sto onda u baze podataka? Ako sam te dobro razumeo, sve sto treba da uradis je da drag&drop - ujes jedan timer na formu, postavis mu interval na recimo 1000 ms i na njegov tick event povecavas neki brojac za 1. Kada on dostigne 15, pokreces drugu formu. Ako korisnik pritisne neko dugme, ti taj brojac resetujes na nulu.

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

Pa nisam ni gledao gde ide i gde sam stavljao! ako nekome smeta izvinite!!

Hajde pojasni ovo sto si rekao, BlasteR, i napisi neki kod.Hvala na vremenu!!!

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

OK. Ja VB.NET ne znam, znam C#, ali konvertovacu kod u VB, tako da ne bi trebalo da bude neki problem. Napravis novi projekat. Na njega dodas nekoliko button-a iz toolbox-a, onoliko koliko ti treba. Isto tako, dodas i timer (u toolboxu se nalazi pod "components"). Kada kliknes na njega, u properties ces dobiti interval. Postavi ga na 1000. Isto tako i Enabled postavi na true. Sada dvaput klikni na taj timer i dobices funkciju koja se poziva svake sekunde (jer je interval timera 1000 ms). Onda napravi jednu promenljivu tipa int koja ce ti biti clanica klase (izvan bilo koje funkcije) i koja ce ti sluziti kao brojac (moja se zove _iBrojac). Napravi i drugu formu koja ce ti biti ScreenSaver.

Ta funkcija koja se poziva kao timer bi trebalo da izgleda otprilike ovako:
Private Sub timer1_Tick(ByVal sender As Object, ByVal e As EventArgs)         _iBrojac = (_iBrojac + 1)         If (_iBrojac = 15) Then             Dim frm2 As Form2 = New Form2             frm2.ShowDialog             _iBrojac = 0         End If     End Sub
Znaci, povecavas brojac za 1. Ako je brojac jednak sa 15, pravis novu formu, prikazujes je (posto je ShowDialog, neces moci da koristis prvu formu dok se ne zatvori druga), i kad se druga forma zatvori, resetujes brojac na 0. E, sad ti ostaje da na svako dugme koje imas na formi dodas:
    Private Sub button1_Click(ByVal sender As Object, ByVal e As EventArgs)         _iBrojac = 0     End Sub
Ti u stvari resetujes brojac svaki put kad neko klikne na neko dugme (ne mora to biti dugme, na tebi je da to odredis).

Ovako bi to trebalo da izgleda na kraju:

Imports System Imports System.Collections.Generic 'using System.ComponentModel; Namespace ProbaTimer     Imports System.Data     Imports System.Drawing     Imports System.Linq     Imports System.Text     Imports System.Windows.Forms             Public Class Form1         Inherits Form                 Private _iBrojac As Integer = 0                 Public Sub New()             MyBase.New             InitializeComponent         End Sub                 Private Sub timer1_Tick(ByVal sender As Object, ByVal e As EventArgs)             _iBrojac = (_iBrojac + 1)             If (_iBrojac = 15) Then                 Dim frm2 As Form2 = New Form2                 frm2.ShowDialog                 _iBrojac = 0             End If         End Sub                 Private Sub button1_Click(ByVal sender As Object, ByVal e As EventArgs)             _iBrojac = 0         End Sub     End Class End Namespace
Ponavljam, nisam siguran da nema mozda neke greske, jer sam radio preko nekog konvertera, ali bi trebalo da je to otprilike to.