vb.net 怎么像QQ一样创建新窗口

vb.net 如何像QQ一样创建新窗口
vb.net 如何像QQ一样创建新窗口，例如frm1是QQ聊天窗口的一个模板
1. 如何创建多个frm1实例
2.在选择其中一个实例的时候，如何知道这个实例被选择了
------解决思路----------------------

'加一个 Button、一个 Label'
Public Class FormMain

    Public Sub OnIdActivated(ByVal id As Integer)
        Me.Label1.Text = "实例" & id & "被选择了"
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        For id As Integer = 1 To 2
            Dim frm As New frm1
            frm.id = id
            frm.Show()
        Next
    End Sub

End Class

Public Class frm1

    Public id As Integer

    Private Sub frm1_Activated(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Activated
        FormMain.OnIdActivated(id)
    End Sub

    Private Sub frm1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Me.Text = id
    End Sub

End Class

------解决思路----------------------
1、 创建多个 就是 “创建1个”重复多次
2、被选择的，告诉”管理者“，”我被选中了“。需要知道的地方 问”管理者“谁被选中了