Hvordan lage et skjema på Runtime i VB6

Visual Basic 6 (VB6) kan brukes til å utvikle mange forskjellige applikasjoner for Microsoft Windows-baserte plattformer. Opprette en ny form for programmet brukeren på den tiden at programmet begynner å løpe, eller "runtime", er en god praksis øvelse for nybegynnere VB6 programmerere som trenger å lære å presentere sine brukere med bruksmuligheter på det tidspunkt søknad lanserer på brukerens skrivebord.

Bruksanvisning

1 Lag en liste over globale variabler for listen for å følge, for eksempel:

Option Explicit

Private allowNumericOnly Som boolsk

Private frm Som Form

Private lblDisplay Som Button

Private WithEvents cmdOK Som Command

Private WithEvents cmdCancel Som Command

Private WithEvents textInput Som TextBox

2 Lag en prosedyre for skjemaet som vil avgjøre hvordan formen ser ut til brukeren og hva som eventuelt tekst og bildetekster vises. Bruk følgende eksempel på kode for å sette dette opp for skjemaet:

Private Sub GenerateRuntimeForm ()

Dim ctrl Som kontroll

Sett frm = Nytt skjema 1

Sett cmdOK = Nothing

Sett cmdCancel = Nothing

Sett textInput = Nothing

Sett lblDisplay = Nothing

For hver ctrl I frm

ctrl.Visible = False

neste

3 Still inn forskjellige kommandoer for knapper, ved hjelp av følgende kode som grunnlag for prosjektet:

Sett cmdOK =

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

Sett cmdCancel =

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

Sett txtInput =

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

4 Fyll ut skjemaet koden ved å legge til følgende visningsforhold og slutter subrutinen med "End Sub" som følger:

cmdOK.Visible = True

cmdCancel.Visible = True

lblDisplay.Visible = True

txtIput.Visible = True

form.sow vbModal

End Sub