Multiple instances of a form

[PRIVATE1]

I read this http://209.207.250.147/showthread.php?threadid=27514
but I didn't get it . I have a from called frm_Pm . What I want is to be able to make mutiple instances of it . It's to send personal messages in a winsock app . How is this done ?

[Shafee]

Hi PRIVATE1,

Dim frmcnt As Integer
Dim NewFrm() As frm_Pm
Sub CreateNewInstance()
   frmcnt = frmcnt + 1
   Redim Preserve NewFrm(frmcnt)
   Set NewFrm(frmcnt) = New frm_Pm
   With NewFrm(frmcnt)
      .Visible = True 'Shows the new form
      'You can do anything to the new instance of the form here.
   End With
End sub

[PRIVATE1]

Thank you
BTW if I create these froms when I'm done using them Should I Unload them With the Unload Statement ?


[Edited by PRIVATE1 on 09-14-2000 at 08:05 AM]

[Shafee]

Yeah, that will free up memory.

The resources are automatically freed when WM_DESTROY is called, however, you can be extra safe and use Set Form = Nothing to free up resources.

Unload MyForm
Set MyForm = Nothing