Windows Forms is de smart client -technologie voor het . NET Framework . Het is een selectie van beheerde bibliotheken die generieke applicatie taken zoals het lezen en schrijven naar het bestandssysteem te vereenvoudigen . In Visual Studio , kunt u Windows Forms -toepassingen die informatie tonen , accepteren input en communiceren met externe computers . De Windows-formulier is een visuele interface waar u informatie kunt laten zien aan gebruikers . U kunt besturingselementen zoals knoppen of tekstvelden of data grid aan het formulier toe te voegen . Het maken van een Windows- formulier of het toevoegen van een nieuwe Windows- formulier om een project is vrij eenvoudig . In sommige omstandigheden kan het nodig zijn om re-size een formulier om een groot scherm te passen . Instructies
1 Klik op " Start", " Alle programma's " en " Visual Studio " aan de geïntegreerde ontwikkelomgeving in te voeren . Selecteer " Visual Basic " als programmeertaal en het Windows- aanvraagformulier als de applicatie-modus . Kopen van 2 Dubbelklik op het Form1.vb om de code in te gaan . Maak een nieuwe module genaamd GetFormSize .
3 Vul de code in de nieuwe module . Definieer hDC , IngRetVal , schermX , Screeny , PIXX en pixy die je zal gebruiken in de programmering : Dim hDc
As Long , lngRetVal Als LongDim schermX als Variant , Screeny Als VariantDim PIXX als Variant , pixy als Variant < br > Goedkope 4 Gebruik GetDeviceCaps functon om het schermformaat te verkrijgen in pixels voor de X -en Y :
schermX = GetDeviceCaps ( hDc , HORZRES ) screeny = GetDeviceCaps ( hDc , VERTRES ) op Twitter De GetDeviceCaps functie haalt apparaat - gerelateerde informatie voor bepaalde apparaat zoals beeldscherm . Het heeft twee argumenten HDC en HORZSIZE die de breedte van het fysieke scherm vertegenwoordigt
5 Enter functie GetDeviceCaps om de omzetting van de pixels voor de X en Y te berekenen : .
PIXX = GetDeviceCaps ( hDc , LOGPIXELSX ) Pixy = GetDeviceCaps ( hDc , LOGPIXELSY ) Zet de pixels te Points via code : x = ( schermX /PIXX ) * 72y = ( screeny /Elf ) * 72
6 Vul de code tussen tussen Sub en End Sub aan re-size het formulier op basis van de berekende pixels voor de x -en Y : Dim x
als Variant , y Zoals VariantGetFormSize x , yLoad Form1With Form1.Top = 0.Left = 0.Width = x.Height = yEnd WithForm1.Show
|
