Attribute VB_Name = "testLabel1"
Sub ƒeƒXƒg()
    Load sampleForm
    sampleForm.nameLabel.Caption = "Name"
    sampleForm.Show
End Sub