Attribute VB_Name = "testForm3"
Sub ƒeƒXƒg()
    Load sampleForm
    sampleForm.Width = 200
    sampleForm.Height = 200
    sampleForm.Show
End Sub