Cómo llamar a la ventana en VB
Supongamos que muestra FORM2 y el texto1 de form2 ha obtenido los datos.
De esta manera, puedes usar el valor de form2 text1 directamente en el código de form1. El método es el mismo que entiendes
Por ejemplo:
imprimir formulario2.text1.text
Si aún no puedes hacerlo, entonces Tienes que escribirlo en form2.show.
Agrega un botón en form1, el código es:
form2.show
form1.hide
Luego agrega un botón en form2 botón, el código es:
form1.show
form2.hide
Entonces puedes volver al principio...
Después de que se ejecute el programa, abra form2 en el botón form1.... Ingrese una cadena de palabras en el texto 1 del formulario 2. Por ejemplo, "Esto está escrito en la Ventana 2".
Luego haga clic en el botón Formulario 2 para regresar al Formulario 1….
Si hay un botón en el formulario 1, su código es:
imprimir formulario2.text1.text
Entonces se pueden mostrar estas palabras...
Agregué: Establecer bandera....
Por ejemplo, la acción COMMAND1 de FORM1 primero verifica el bit de bandera, el valor predeterminado es FALSO, luego ejecuta la acción hasta MOSTRAR FORM2, y luego saldrá FORM2, escriba el contenido del cuadro de texto y luego asegúrese de cambiar el indicador a VERDADERO primero, luego OCULTAR FORM2 y luego LLAMAR COMANDO1 de FORM1...
La segunda mitad del código COMMAND1 de FORM1 es identificar la Acción cuando el bit de bandera es VERDADERO.
A veces, las palabras siempre parecen pálidas y débiles.... Código adicional:
Nuevo proyecto, dos formularios.
form1, un botón, un Texto1
form2, un botón, un Texto1
El código de form1 es el siguiente:
Cmdzt público como booleano
Subcomando público1_Click()
Si cmdzt = False entonces
Me.Hide
Form2.Show
Explorer.Página.Página.Página.Página.Página.Página.Página.Página.Página.Página.Página.Página.Página.Página.Página.Página.Página.Página.Página.Página.Página.Página .Page.Page.Page.Page.Page.Page.Page.Page.Page.Page.
Salir de Sub
Fin
Si cmdzt = True Then
Text1 = Form2.p>cmdzt = False 'Para aceptar la siguiente operación
End If
End Sub
Private Sub Form_Load ()
cmdzt = False
End Sub
Código de Form2:
Private Sub Command1_Click()
Form1.cmdzt = True
Llamar a Form1.Command1_Click
Form1.Show
Me.Hide
Fin Sub
No sé si esto es lo que quieres decir con hacer clic en un botón en el formulario 1, correr a 1 mitad (la primera mitad), abrir el formulario 2, ingresar datos, hacer clic en el botón, regresar al formulario 1, luego continuando con los mismos botones.....
Mi código es hacer clic en el botón en el formulario 1. Debido a que la bandera es FLASE, se abre el formulario 2. En el formulario 2, puede ingresar algunos datos en el cuadro de texto y luego presionar el botón. bit de bandera del Formulario 1 a VERDADERO, y luego LLAMAR a la acción del botón en el Formulario 1. Debido a que el bit de bandera ha cambiado, el botón en el Formulario 1 ejecutará el resto del código (la mitad inferior). ...es mostrar el Formulario 2 en el cuadro de texto del Formulario 1 y simplemente ingresar información en el cuadro de texto....