Apri un nuovo progetto, metti 2 command button e una label.
Copia questo codice
codice:
Option Explicit
Dim Var1 As String

Private Sub Command1_Click()
   Var1 = "Ciao"
End Sub


Private Sub Command2_Click()
   Label1.Caption = Var1
End Sub
quindi clicca prima sul command1 e poi sul command2

Ciao.