VB: Después de copiar y pegar el texto, restaurarlo al texto original y restaurar la programación del botón

Dim?ywb?As?String

Private?Sub?Command1_Click()

'Restaurar texto

Text1.Text?= ?""

Texto1.Text?=?ywb

Fin?Sub

Privado?Sub?Command2_Click()

'Pegar Texto

Texto1.Text?=?""

Texto1.Text?=?"Este es el texto pegado"

End?Sub

Private?Sub?Form_Load()

Text1.Text?=?""

Text1.Text?=?"Este es el texto original"

ywb?=?Text1.Text

Fin?Sub