Ako vytvoriť formulár v behu na VB6

Visual Basic 6 ( VB6 ) môže byť použitý na vytvorenie mnoho rôznych aplikácií pre Microsoft Windows založené na počítačových platformách . Vytvorenie nového formulára pre užívateľov aplikácie v čase, keď aplikácia začína plynúť , alebo " runtime , " je dobrá prax cvičenia pre začiatočníkov VB6 programátorov , ktorí sa potrebujú naučiť , aby predložili svoje užívateľa s možnosťou použitia v dobe aplikácie spustí na desktop užívateľa . Pokyny dovolená 1

Vytvoriť zoznam globálnych premenných na zozname nasledovať , napr :

Option Explicit

Súkromná allowNumericOnly As Boolean

súkromná frm , ktoré tvoria

súkromné ​​lblDisplay ako tlačidlo

súkromné ​​WithEvents cmdOK ako CommandButton

súkromné ​​WithEvents cmdCancel ako CommandButton

súkromné ​​WithEvents textInput ako TextBox

2

Vytvorte procedúru pre formulár , ktorý bude určovať, ako formuláre sa zobrazí používateľovi a čo, ak sa objavia ľubovoľný text a titulky . Použite nasledujúci príklad kódu stanoveného to pre formuláre :

Private Sub GenerateRuntimeForm ( )

Dim Ctrl Control

Set frm = New Form 1

Set cmdOK = Nothing

Nastaviť cmdCancel = Nothing

Nastaviť textInput = Nothing

Nastaviť lblDisplay = Nothing

Každý ctrl V frm

ctrl.Visible = False

Ďalšie
3

Nastavte rôzne príkazy pre tlačidlá , pomocou nasledujúci kód ako základ pre svoj ​​projekt :

Nastaviť cmdOK =

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

Set cmdCancel =

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

Set txtInput =

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

Vyplňte formulár kód pridaním nasledujúcich podmienok zobrazenie a ukončenie podprogramu sa " End Sub " takto :

cmdOK.Visible = TRUE

cmdCancel.Visible = TRUE

lblDisplay.Visible = TRUE

txtIput.Visible = TRUE

form.sow vbModal

End Sub

• Predchádzajúca strana: Čo je to dáta Stálosť 
• Ďalšia strana: Ako si vyrobiť prasa hru v pseudokódu