[ابو محمد محمد محمد]

كود :

If Application.OpenForms().OfType(Of Form2).Any Then
 MessageBox.Show("Opened")
Else
 Dim f2 As New Form2
 f2.Text = "form2"
 f2.Show()
End If

اكيد انت تقصد هل هو مفتوح ام لا