第一问:
从你贴的代码确实如此,假如还有代码没贴全就不一定了。第二问:
可以启动form1的多个实例。
这样试:
  dim f as form1
  set f=new form1
  f.show
  set f=new form1
  f.show
  set f=new form1
  f.show连续三遍,试试看运行效果就明白了。

解决方案 »

  1.   

    1.只看这一段,dim anytext as textbox确是画蛇添足,可能作者的意图是为了演示对象赋值的用法。
    2.set f=new form1是以form1为模板创建一新的Form,它不同于form1的地址,而是真正的另建立一新对象。而set f=form1则指向form1的地址。
      

  2.   

    private sub form_click()
                dim anytext as textbox
                set anytext = text1
               anytext.text="hello"
    End Sub如果textbox是一个接口类,那么text1就是一个代码类,用来实现!