Public Class Form1


'CREO LES VARIABLES

Dim temporal As String


'EN FER CLIC AL BOTO

Private Sub Boto1_Click(sender As Object, e As EventArgs) Handles Boto1.Click


'PRIMER DESO LA INFORMACIO QUE MATXACARE
temporal = Boto2.Text


'MATXACO
Boto2.Text = Boto1.Text


'RECUPERO INFORMACIO DESADA
Boto1.Text = temporal


End Sub


'EN FER CLIC AL BOTO
Private Sub Boto2_Click(sender As Object, e As EventArgs) Handles Boto2.Click


'PRIMER DESO LA INFORMACIO QUE MATXACARE
temporal = Boto2.Text


'MATXACO
Boto2.Text = Boto1.Text


'RECUPERO INFORMACIO DESADA
Boto1.Text = temporal


End Sub


End Class

Darrera modificació: dimecres, 5 de novembre 2025, 11:42