Hola resulta que estoy creando un instancia de una Form pero me gustaria ademas enviarle un parametro pero no tengo claro como, uso instancia para que solo se pueda crear una vez el formulario.
Asi invoco al form:
Código:
Dim frmAdmTipo As frmAdmTipo = frmAdmTipo.Instance
frmAdmTipo.MdiParent = Me
frmAdmTipo.Show()
En el form:
Código:
Public Class frmAdmTipo
Public _Tipo As String = Nothing
Public _Tabla As String = Nothing
Public _CodigoTipo As Integer = Nothing
'Variable pública.
Private Shared ChildInstance As frmAdmTipo = Nothing
'controla que sólo exista una instancia del formulario.
Public Shared Function Instance() As frmAdmTipo
If ChildInstance Is Nothing OrElse ChildInstance.IsDisposed = True Then
ChildInstance = New frmAdmTipo
End If
ChildInstance.BringToFront()
Return ChildInstance
End Function
Public Sub New(Optional ByVal Tipo As String = Nothing, Optional ByVal Tabla As String = Nothing)
InitializeComponent()
_Tipo = Tipo
_Tabla = Tabla
Me.Text = " Administración - " & _Tipo
Me.dgvTipo.Columns.Item(1).HeaderText = _Tipo
End Sub
No se como ahora enviarle los parametros tabla y tipo.
Alguna sugerencia por favor, gracias.