Cómo crear un formulario en tiempo de ejecución de Visual Basic 6

Visual Basic 6 (VB6) puede ser utilizado para desarrollar muchas aplicaciones diferentes para plataformas informáticas basadas en Microsoft Windows. Crear un nuevo formulario para el usuario de la aplicación en el momento en que la aplicación comienza a funcionar, o "tiempo de ejecución", es un ejercicio de buenas prácticas para los programadores VB6 principiantes 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. 

CREAR TIEMPO

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

Option Explicit

AllowNumericOnly Private As Boolean

Frm Private Como Form

LblDisplay privado como Button

Private WithEvents cmdOK Como CommandButton

Private WithEvents cmdCancel Como CommandButton

Private WithEvents textInput Como TextBox

Crear un procedimiento para la forma que determinará cómo la forma se muestra al usuario y lo que, si van a aparecer el texto y los títulos. Utilice el siguiente ejemplo de código para configurar esto para el formulario:

Private Sub GenerateRuntimeForm ()

Dim ctrl As Control

Set frm = New Form 1

Establecer cmdOK = Nothing

Establecer cmdCancel = Nothing

Establecer textInput = Nothing

Establecer lblDisplay = Nothing

For Each ctrl En frm

ctrl.Visible = False

Próximo

Establecer los diferentes comandos de los botones, utilizando 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")

Complete el código de formulario mediante la adición de las siguientes condiciones de exposició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