Ako nainštalovať veľké veľkosti formy s VB6

Windows Forms je technológia , inteligentný klient pre Framework .. Jedná sa o výber z riadených knižníc , ktoré zjednodušujú všeobecné aplikačné úlohy , ako je čítanie a písanie do súborového systému . V Visual Studio , môžete vytvoriť model Windows Forms založené aplikácie , ktoré zobrazujú informácie , prijímať vstup a komunikovať so vzdialenými počítačmi . Windows Form je vizuálne rozhranie , kde si môžete zobraziť informácie pre používateľov . Môžete pridať ovládacie prvky , ako sú tlačidlá alebo textové polia alebo dátovej siete do formulára . Vytvorenie formulára systému Windows alebo pridanie nového formulára systému Windows na projekte je veľmi jednoduché . V niektorých prípadoch môže byť nutné re- veľkosť formulára , aby sa zmestili na veľkú obrazovku . Pokyny dovolená 1

Kliknite na tlačidlo " Štart " , " Všetky programy " a " Visual Studio " pre vstup do integrované vývojové prostredie . Vyberte " Visual Basic " ako programovací jazyk a Windows prihláška režime aplikácie .
2

Dvakrát kliknite na Form1.vb zadať kód rozhrania . Vytvorte nový modul s názvom GetFormSize .
3

Zadajte kód novovytvorenej modulu . Definujte hdc , IngRetVal , screenX , screeny , Pixx a škriatok , ktorý budete používať v programovaní :

Dim hdc As Long , lngRetVal Ako LongDim screenX As Variant , screeny Ako VariantDim Pixx As Variant , Pixy As Variant
Stránka 4

Použite GetDeviceCaps functon získať veľkosť obrazovky v pixeloch pre X a Y :

screenX = GetDeviceCaps ( hdc , HORZRES ) screeny = GetDeviceCaps ( hdc , VERTRES )

Funkcia GetDeviceCaps načíta informácie o zariadení súvisiace s pre konkrétne zariadenie , ako monitora . To má dva argumenty HDC a HORZSIZE ktorá predstavuje šírku fyzickej obrazovky
5

Zadajte funkcií GetDeviceCaps na výpočet konverzie pixelov pre X a Y : .

Pixx = GetDeviceCaps ( hdc , LOGPIXELSX ) Pixy = GetDeviceCaps ( hdc , LOGPIXELSY ) Previesť pixelov na body pomocou kódu : x = ( screenX /Pixx ) * 72y = ( screeny /Pixy ) * 72
6

Zadajte kód medzi medzi Sub a End Sub re- size formulár na základe vypočítaných bodov pre x a y :

Dim x As Variant , y Ako VariantGetFormSize x , yLoad Form1With Form1.Top = 0.Left = 0.Width = x.Height = Yendo WithForm1.Show

• Predchádzajúca strana: Ako si vyrobiť Bliká tlačidlo VB 
• Ďalšia strana: Ako vytvoriť pole komponentov na VB.NET Designer