VB6の as new 構文の楽しい挙動

Dim frm as New Form1
frm.visible=true '表示される
set frm=nothing 'とりあえず Formsコレクションに残っているので表示されたまま
frm.visible=true '2つめが表示される