Attribute VB_Name = "testMulti1"
Sub テスト()
    Load sampleForm
    sampleForm.multiPage.page1.Caption = "入力"
    sampleForm.multiPage.page2.Caption = "選択"
    sampleForm.multiPage.page3.Caption = "処理"
    sampleForm.Show
End Sub