[RESOLVED] opening forms

Example:

I have a main form: frmMain

and other secundary forms: frm1 and frm2

Main form has 2 buttons

BUTTON1: Open form1

Quote:

---

dim f as new frm1
f.tag="pepe"
f.showdialog

---

BUTTON2: Open new instance:

Quote:

---

dim f as new frm1
f.tag="manolo"
f.showdialog

---

Ok. 2 instances of frm1 are opened.

But now if the user clicks BUTTON1 will create a new instance. But I dont want this. How I can show (focus) the frm1 with tag "pepe".

Only I want create new instances if tag is different. If tag is the same, the form will be focused.

any idea?

You can loop through the OpenForms of the application:

Code:

---

        Dim found As Boolean = False
        For Each f As Form In Application.OpenForms()
            If f.Tag.ToString() = "pepe" Then
                f.Focus()
                found = True
            End If
        Next
        If found = False Then
            Dim f As New Form1
            f.Tag = "pepe"
            f.ShowDialog()
        End If

---

:thumb::thumb:

Runs fine!