allora, ciò che ti propongo prevede che nel label1.caption ci sia già scritto qualcosa, altrimenti non cambia nulla:
Private Sub Command1_Click()
x = Label1.Caption
For a = 1 To 3
Label1.Caption = Label1.Caption & x
Next
End Sub
il tuo errore sta nell'aver utilizzato sia per il ciclo for che per la dichiarazione la stessa variabile, quindi il programma se ne va a ...
|