Oppure

Loading
19/04/07 20:37
jack1988
dv ho sbagliato?...xkè a me nn funziona...aiuto!!!:k::k::rotfl:
aaa
20/04/07 16:48
P4p3r0g4
n è integer
devi porla a 0
devi mettere un intervallo al timer alla fine ricorda di azzerare il timer se no vai in overflow
aaa
21/04/07 17:29
c.ronaldo
Allora jack funziona?:-|
aaa
24/04/07 13:52
jack1988
cmq nn funziona e nn so xkè...ho fatto questo:

Option Explicit
Private Sub Timer1_Timer()
Dim N As Integer
N=0
Select Case N
case 1
text1.text="Benvenuti nel mio programma
case 2
text1.text="bla bla bla"
end select
N=N+1
end sub

poi ho impostato il timer a 2000 d Interval...cs devo cambiare pure?...dv sbaglio?...Aiuto!!!
:k::k::k:
aaa
24/04/07 14:30
c.ronaldo
Naturale che non và...

Se ogni volta che il timer si aziona dici che la variabile N = 0 non può diventare mai 1 o 2...

Un'altra cosa se vuoi che si ripeta sempre,una volta arrivata a 2(il numero di frasi,ma che può anche essere differente),si deve azzerare,o meglio deve essere = 1... Ti posto il codice modificato :


Dim N As Integer
Private Sub Form_Load()
N = 0
End Sub

Private Sub Timer1_Timer()
If N > 2 Then N = 1
Select Case N
Case 1
Text1.Text = "Benvenuti nel mio programma "
Case 2
Text1.Text = "bla bla bla"
End Select
N = N + 1
End Sub



Come vedi la variabile N solo all'inizio(cioè Form_Load) è uguale a 0! Intendi:k:
aaa
24/04/07 15:00
jack1988
Scusa...ho capito dv è l'errore...ke cretino...Grazie mille c.ronaldo!!!:k::k::k:
ciao...:D
aaa
26/04/07 11:42
c.ronaldo
Ciao e alla prossima:k:
aaa