如何创建多个相同界面的窗体？

Question

我需要多个一模一样的窗体，但是数量较多，不能再设计时都画上，有什么办法能只设计一个就行？或者在程序中动态创建这些窗体吗？

Answer 1

一摸一样的窗体？
你设计的时候弄一个。比如form1。
然后在sub main（）里面这样调用
dim form1_1 as new form1
dim form1_2 as new form1
dim form1_3 as new form1
form1_1.show
form1_2.show
form1_3.show
.......

Answer 2

dim frmnew as form1
set frmnew=new form1
frmnew.show
set frmnew=nothing

Answer 3

就是窗体也是模块，可以new的
dim form1 as new mainform
dim form2 as new mainform
...

Answer 4

Dim i As Integer
  Dim Frmname As String
 For i = 1 To 10
  Frmname = "Frm" & i
  Dim Frmname As New Form1
  Frmname.Show
Next

Answer 5

Private Sub Command1_Click ()
   Dim i As Integer
   Dim frmNew(1 To 5) As New Form1
   For i = 1 To 5
      frmNew(i).Show
   Next i
End SubORSub main()
    Dim i As Integer
    Dim Frm(10) As Form
    For i = 1 To 10
        Set Frm(i) = New Form1
        Frm(i).Caption = "Form" & i
        Frm(i).Show
    Next
End Sub

Answer 6

我需要多个一模一样的窗体，但是数量较多，不能再设计时都画上，有什么办法能只设计一个就行？或者在程序中动态创建这些窗体吗？
————————————————————————————————————————要明白这个概念：
设计时画的窗体是一个窗体类，程序运行时，显示的则是窗体类的一个实例。两者是不同的
概念。就好比，设计的窗体类是人类，而death (death) 是个人。不能说人类正在拉屎，
而说death (death) 正在拉屎。也就是说具体的行为是对象完成，类仅仅是个蓝图，对象
则是高楼。显示窗体，必须先实例化该窗口类的一个对象实例（如Set Frm = New Form1），
然后对象执行Show方法显示该窗体对象(frm.show)。一个类可实例化多个对象，就像人类
就一个，但地球上人有很多一样。你的提问，显然是混淆了类和对象的区别。

Answer 7

楼上举例...........
瀑布汗..................
 winehero(编程人生) I服了U

Answer 8

可以动态添加删除控件的
Controls.Add
Controls.Remove或者用控件数组
load
unload

Answer 9

就好比，设计的窗体类是人类，而death (death) 是个人。不能说人类正在拉屎，
而说death (death) 正在拉屎。=============================================================
哈哈,此"death"非彼death也

Answer 10

人家只是要很多个功能界面一样的窗体， winehero(编程人生) 却把这个问题提升到哲学的角度去讨论
要是按 winehero(编程人生) 的论点去说的话，人类语言中就不应该有“一模一样”这个词，因为从哲学角度来说任何东西都没有一模一样的

Answer 11

呵呵，很普通的一个问题，查一下MSDN就有答案了。居然会有这样的讨论，有意思

Answer 12

我靠！搞什么东西你们。
将窗体保存到C:\Microsoft Visual Studio\VB98\Template\Forms下（具体路径根据情况）。然后到VB里面，添加窗体对话框中自己去找！！