Visual Basic 6 ( VB6 ) kan bruges til at udvikle mange forskellige applikationer til Microsoft Windows-baserede platforme . Oprettelse af en ny form for anvendelse brugeren på det tidspunkt , at ansøgningen begynder at løbe , eller "runtime ", er en god praksis øvelse for nybegyndere VB6 programmører, der har brug for at lære at præsentere deres brugere med anvendelsesmuligheder på det tidspunkt, programmet startes på brugerens skrivebord . Instruktioner
1
Opret en liste over globale variable for listen at følge, for eksempel : Hej
Option Explicit
Private allowNumericOnly Som Boolean
private frm Som Form
private lblDisplay Som Button
private WithEvents cmdOK Som KommandoKnap
private WithEvents cmdCancel Som KommandoKnap
private WithEvents TextInput Som TextBox
2
Opret en procedure for den form, vil bestemme, hvordan formularen ser ud til brugeren og hvilke eventuelle tekst og billedtekster vises. Brug følgende eksempel på kode til sætte det op for din formular : Hej
Private Sub GenerateRuntimeForm ()
Dim ctrl Som Kontrol
Set frm = Ny Form 1
Set cmdOK = Nothing
Set
cmdCancel = Nothing
Set TextInput = Nothing
Set lblDisplay = Nothing
For Each ctrl In frm < br >
ctrl.Visible = False
Næste
3
Indstil forskellige kommandoer til knapperne , ved hjælp af følgende kode som grundlag for dit projekt : < 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
Udfyld formularen kode ved at tilføje følgende display betingelser og slutter subrutinen med " End Sub " som følger : Hej
cmdOK.Visible = Sand
cmdCancel.Visible = Sand
< p > lblDisplay.Visible = Sand
txtIput.Visible = Sand
form.sow vbModal
End Sub