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