Windows Form è la tecnologia smart client per il NET Framework . . Si tratta di una selezione di librerie gestite che semplificano le attività delle applicazioni generiche come la lettura e la scrittura nel file system. In Visual Studio , è possibile creare applicazioni basate su che mostrano le informazioni di Windows Form , accettare input e di comunicare con i computer remoti . Il Windows Form è una interfaccia visuale in cui è possibile visualizzare informazioni agli utenti . È possibile aggiungere i controlli come pulsanti o campi di testo o della griglia di dati al form. Creazione di un modulo di Windows o l'aggiunta di un nuovo Windows Form a un progetto è abbastanza semplice. In alcune circostanze , potrebbe essere necessario ridimensionare una forma per adattarsi a un grande schermo . Istruzioni
1
Fare clic su "Start ", " Tutti i programmi " e " Visual Studio" per entrare nell'ambiente di sviluppo integrato . Selezionare " Visual Basic ", come il linguaggio di programmazione e il modulo di domanda di Windows come la modalità di applicazione .
2
doppio clic Form1.vb per accedere all'interfaccia codice . Creare un nuovo modulo denominato GetFormSize .
3
Inserisci il codice nel modulo appena creato . Definire HDC, IngRetVal , screenX , Screeny , Pixx e Pixy che verrà utilizzato nella programmazione :
Dim hDc As Long , lngRetVal Come LongDim screenX As Variant , Screeny Come VariantDim Pixx As Variant , Pixy As Variant < br >
4
Usa GetDeviceCaps functon per ottenere le dimensioni dello schermo in pixel per X e Y :
screenX = GetDeviceCaps ( hDC, HORZRES ) Screeny = GetDeviceCaps (HDC , VERTRES ) per < p > La funzione GetDeviceCaps recupera le informazioni relativo al dispositivo per certo dispositivo come schermo del monitor. Ha due argomenti HDC e HORZSIZE che rappresenta la larghezza dello schermo fisico
5
Inserisci GetDeviceCaps funzione per calcolare la conversione di pixel per X e Y : .
Pixx GetDeviceCaps = ( hDC, LOGPIXELSX ) Pixy = GetDeviceCaps (HDC , LOGPIXELSY ) Converti i pixel per i punti intermedi codice : x = ( screenX /Pixx ) * 72y = ( Screeny /Pixy ) * 72
6
Inserisci il codice tra tra Sub ed End Sub per ridimensionare la forma in base ai pixel calcolati per X e Y :
Dim x As Variant , y Come VariantGetFormSize x , yLoad Form1With Form1.Top = 0.Left = 0.Width = x.Height = YEND WithForm1.Show