Evitar que desde un botón se abra varias veces el mismo form

[Mary_]

Me da error en l primer if de la funcion AbrirVentana q dice
q el operador = igual no está definido para system.windows.forms.form y q
utilice "is" pero no m funciona. Estoy utilizando vb.net

If (formulario = CType(formInstances(type.ToString), Form)) Is Nothing OrElse formulario.IsDisposed Then
formulario = CType(Activator.CreateInstance(type), Form)
formInstances(type.ToString) = formulario
End If

Gracias.