Attribute VB_Name = "testTextbox2"
Sub テスト()
    Load sampleForm
    sampleForm.nameText.Text = "初期値"
    sampleForm.Show
End Sub