Ho scritto queste righe di codice e va tutto bene fino a quando fisso un valore di partenza conta stabilito a livello di codice, mentre se voglio impostarlo in esecuzione del programma incontro degli errori.
Quello che voglio fare è scrivere il valore di partenza del timer su una textbox. La label prende il valore della textbox e quando premo start il timer si avvia da quel valore.
codice:Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick Timer1.Start() Timer1.Interval = 1000 If Label12.Text = 10 Then Label12.ForeColor = Color.Red Label12.Text = Val(Label12.Text) - 1 ElseIf Label12.Text = 0 Then Timer1.Enabled = False MsgBox("Tempo scaduto!") Else Label12.Text = Val(Label12.Text) - 1 End If End Sub Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Label12.ForeColor = Color.Black If Timer1.Enabled = True Then Timer1.Start() Else Label12.Text = 20 Timer1.Start() End If End Sub End Class
Ho provato a scrivere cosi al posto di questa riga
Label12.Text = 20
ho sostituito con questa
label12.Text = form2.Textbox13.Text
ma mi da errore e non compila
ps. la textbox è nel secondo form

Rispondi quotando