Ejecutar un formulario 1 y pasar a un formulario 2 sin cerrar el formulario 1
Publicado por AlvaroRodriguez (8 intervenciones) el 05/08/2019 08:15:02
Buenos días a todos, estoy desarrollando un proyecto en vb.net y mi objetivo es ejecutar un primer formulario bastante sencillo que al pulsar en un botón me abra otro formulario algo más complejo pero sin dejar de ejecutarse el formulario 1. En mi proyecto tengo los códigos de cada formulario (1 y 2) como una clase public y una friend class respectivamente y todo lo ejecuto desde el mismo main.
Os adjunto el código del main.vb a ver si me podéis echar una mano:
Tal y como tengo el código ahora, lo que he conseguido es que al pulsar el boton del formulario 1 (APLICACION) me abra el formulario 2 (MainForm) pero se me cierra el primer formulario y quiero que continúen abiertos ambos formularios.
A ver si me podéis ayudar,
Un saludo, Álvaro
Os adjunto el código del main.vb a ver si me podéis echar una mano:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
Option Strict Off
Option Explicit On
Imports TmctlAPINet
'Module Consts
Module Startup
Public TmctlDev As TMCTL
'#--------------------------------------------#
'### Funcion Inicio:Main ###
'#--------------------------------------------#
Sub Main()
TmctlDev = New TMCTLDim Selectclose As Boolean
Dim frmSelectAPP As APLICACION
Dim frmMain As MainForm
Dim rtn As DialogResult
frmSelectAPP = New APLICACIONrtn = DialogResult.Retry
While rtn = DialogResult.Retry
rtn = frmSelectAPP.ShowDialog()
End While
If rtn = DialogResult.OK Then
frmSelectAPP.Dispose()
frmMain = New MainFormfrmMain.ShowDialog()
frmMain.Dispose()
Else
frmSelectAPP.Dispose()
End If
frmSelectAPP.Dispose()
End Sub
End Module
Tal y como tengo el código ahora, lo que he conseguido es que al pulsar el boton del formulario 1 (APLICACION) me abra el formulario 2 (MainForm) pero se me cierra el primer formulario y quiero que continúen abiertos ambos formularios.
A ver si me podéis ayudar,
Un saludo, Álvaro
Valora esta pregunta
0
