Predmet:Dinamicko pokretanje forme
PreuzmiIzvorni kôd (Visual Basic):Privatni Sub Form_Load ()
S List1
. AddItem "Form1"
. AddItem "Form2"
. AddItem "Form3"
Završiti s
End Sub
PreuzmiIzvorni kôd (Visual Basic):Privatni Sub List1_Click ()
Dim frm kao oblik
Dim selForm kao niz
S List1
selForm =. List (. ListIndex)
Završiti s
Set frm = Forms.Add (selForm)
frm.Show
Set frm = Nothing
End Sub
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.