ferruccio94 (Normal User)
Newbie
Messaggi: 14
Iscritto: 09/10/2009
|
Questo topic è stato chiuso dal moderatore
Codice sorgente - presumibilmente VB.NET |
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick Dim randX As New Random Dim randY As New Random Dim PosX As Integer Dim PosY As Integer PosX = randX.Next(5, 295) PosY = randY.Next(5, 295) X.Location = New System.Drawing.Point(PosX, PosY) End Sub
|
In pratica, ogni 10 secondi il label si sposta, ma rimane sempre nella stessa diagonale:
Come posso risolvere?
Ultima modifica effettuata da ferruccio94 il 08/11/2009 alle 16:48 |