Gewusst wie: Erstellen eines Formulars zur Laufzeit in VB6

Visual Basic 6 (VB6) kann verwendet werden, um viele verschiedene Anwendungen für Microsoft Windows-basierten Computer-Plattformen zu entwickeln. Erstellen eines neuen Formulars für den Benutzer der Anwendung auf die Zeit, die die Anwendung beginnt zu laufen, oder die "Laufzeit" ist eine gute Praxis-Übung für Anfänger VB6-Programmierer, die lernen müssen, ihre Benutzer mit Anwendungsoptionen zur Zeit zu präsentieren, wie die Anwendung auf dem Desktop des Benutzers startet.

Anweisungen

1 Erstellen Sie eine Liste der globalen Variablen für die Liste zu folgen, zum Beispiel:

Option Explicit

Private AllowNumericOnly As Boolean

Private Frm As Form

Private LblDisplay As Button

Private WithEvents CmdOK als CommandButton

Private WithEvents CmdCancel als CommandButton

Private WithEvents TextInput als TextBox

2 Erstellen Sie eine Prozedur für das Formular, das bestimmt, wie das Formular des Benutzers und was angezeigt wird, wenn alle Texte und Beschriftungen angezeigt werden. Verwenden Sie das folgende Beispiel des Codes, um dies für Ihr Formular eingerichtet:

Private Sub GenerateRuntimeForm()

Dim Ctrl als Steuerelement

Set Frm = neue Form 1

Legen Sie CmdOK = Nothing

Legen Sie CmdCancel = Nothing

Legen Sie TextInput = Nothing

Set LblDisplay = Nothing

Für jede STRG In frm

STRG. Visible = False

Nächste

3 Legen Sie die verschiedenen Befehle für die Schaltflächen mithilfe des folgenden Codes als Grundlage für Ihr Projekt:

Legen Sie CmdOK =

Frm. Controls.Add ("VB.CommandButton", "CmdOK")

Legen Sie CmdCancel =

Frm. Controls.Add ("VB.CommandButton", "CmdCancel")

Set TxtInput =

Frm. Controls.Add ("VB. TextBox","TxtInput")

4 Führen Sie des Formularcodes, indem du folgende Display-Bedingungen und die Unterroutine mit "End Sub" wie folgt enden:

cmdOK.Visible = True

cmdCancel.Visible = True

lblDisplay.Visible = True

txtIput.Visible = True

Form.Sow vbModal

EndSub