Red de conocimiento informático - Problemas con los teléfonos móviles - Cómo llamar a la ventana en VB

Cómo llamar a la ventana en VB

Eh...

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....