Visual Basic 6 ( VB6 ) se puede utilizar para desarrollar diferentes aplicaciones para plataformas 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 . Instrucciones
1
Crear una lista de variables globales de la lista a seguir , por ejemplo :
Option Explicit Private
allowNumericOnly As Boolean
frm privado como formulario
lblDisplay privado como botón
Private WithEvents cmdOK Como CommandButton
Private WithEvents cmdCancel Como CommandButton
Private WithEvents textInput Como
TextBox Página 2
Crear un procedimiento para la forma que va a 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
cmdOK Set = Nothing
cmdCancel Set = Nothing
textInput Set = Nothing
lblDisplay Set = Nothing
For Each ctrl En frm < br >
ctrl.Visible = False
Siguiente
3
Establecer los diferentes comandos de los botones , usando el siguiente código como base para su proyecto: < br >
Set cmdOK =
frm.Controls.Add ( " VB.CommandButton ", " cmdOK " )
Set cmdCancel =
frm.Controls.Add ( " VB.CommandButton ", " cmdCancel " )
Set txtInput =
frm.Controls.Add ( " VB.TextBox ", " txtInput ")
4
Completar 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
< p > lblDisplay.Visible = True
txtIput.Visible = True
form.sow vbModal
End Sub