Actualizar control en formulario instanciado
Tengo un formulario instancia
De otro. Este formulario tiene un control LISTBOX que al clicar uno de
los registros que muestra me abre un segundo formulario de
edición/modificación del registro seleccionado. Este segundo formulario
al cerrarlo debe actualizar el listbox del primero para que los cambios
se muestren en el LISTBOX.
Un ejemplo gráfico sería un formulario
Que muestre en un listbox los almacenes de la empresa y al clicar sobre
un almacén abre un segundo formurio para editarlo, por ejemplo cambiarle el nombre. Al cerrar el segundo el nombre en el listbox del primero debe actualizarse.
Si fuese un formulario normal sería muy fácil poner en el evento AL SALIR: Forms! Formulario! LISTBOX. Requery
El problema es que es una instancia y no sé como referirme al formulario instanciado
La instancia es abierta desde otro formulario, digamos que panel de control, con el siguiente procedimiento
Option Compare Database
Option Explicit
Dim instancia(1 To 5) As Form
Dim numinstancia As Integer
-------------------------
Private Sub AbreInstancia()
numinstancia = numinstancia + 1
If numinstancia > 5 Then
AvisoLimiteinstancias = MsgBox("Demasiadas ventanas abiertas. Debe cerrar alguna.", vbCritical, "Aviso")
Exit Sub
End If
Set instancia(numinstancia) = New Form_frmTablas
instancia(numinstancia).Visible = True
End Sub
El esquema sería
Botón de FORMULARIO0-->abre INSTANCIA(1)...que es una instancia del formulario [frmTablas]
Listbox de INSTANCIA(1)-->abre FORMULARIO2
FORMULARIO2-->actualiza Listbox de INSTANCIA(1)
Lógicamente las instancias pueden ser varias: INSTANCIA(1), INSTANCIA(2)... Y todas ellas pueden abrir el FORMULARIO2.