Cómo crear un formulario en tiempo de ejecución en VB6

Visual Basic 6 (VB6) puede ser utilizado para desarrollar muchas aplicaciones diferentes para plataformas informáticas basadas en Microsoft Windows. La creación de una nueva forma para el usuario de la aplicación en el momento en que la aplicación comienza a correr, o "tiempo de ejecución", es un ejercicio de buenas prácticas para los programadores VB6 novatos que necesitan aprender a presentar sus usuarios con posibilidades de aplicación en el momento de la aplicación se inicia en el escritorio del usuario.

Instrucciones

1 Crear una lista de variables globales de la lista a seguir, por ejemplo:

Option Explicit

allowNumericOnly privada As Boolean

frm privada como formulario

lblDisplay privada como botón

Private WithEvents cmdOK Como CommandButton

Private WithEvents cmdCancel Como CommandButton

Private WithEvents textInput Como cuadro de texto

2 Crear un procedimiento para la forma que va a determinar cómo quedará el formulario al usuario y lo que, si van a aparecer cualquier texto y subtítulos. Utilice el siguiente ejemplo de código para configurar esto para su formulario:

Private Sub GenerateRuntimeForm ()

ctrl dévil como control

Establecer frm = Nuevo Formulario 1

Establecer cmdOK = Nada

Establecer cmdCancel = Nada

Establecer textInput = Nada

Establecer lblDisplay = Nada

Para cada ctrl En frm

ctrl.Visible = false

Siguiente

3 Establecer los diferentes comandos de los botones, usando el siguiente código como base para su proyecto:

Establecer cmdOK =

frm.Controls.Add ( "VB.CommandButton", "cmdOK")

Establecer cmdCancel =

frm.Controls.Add ( "VB.CommandButton", "cmdCancel")

Establecer txtInput =

frm.Controls.Add ( "VB.TextBox", "txtInput")

4 Completar el código de formulario mediante la adición de las siguientes condiciones de visualización y termina la subrutina con "End Sub" de la siguiente manera:

cmdOK.Visible = True

cmdCancel.Visible = True

lblDisplay.Visible = True

txtIput.Visible = True

form.sow vbModal

End Sub