Windows Forms er smart klient teknologi til NET Framework . . Det er et udvalg af administrerede biblioteker, der forenkler generiske applikationers opgaver såsom læsning og skrivning til filsystemet . I Visual Studio , kan du oprette Windows Forms baserede applikationer , der viser oplysninger , accepterer input og kommunikere med eksterne computere . Windows Form er en visuel grænseflade, hvor du kan vise informationer til brugerne. Du kan tilføje kontrolelementer såsom knapper eller tekstfelter eller data grid til formularen . Oprettelse af en Windows- formular eller tilføje en ny Windows-formular til et projekt er temmelig ligetil . I nogle tilfælde kan du nødt til at re- size en formular til at passe en stor skærm. Instruktioner
1
Klik på "Start ", " Alle programmer " og " Visual Studio " for at indtaste det integrerede udviklingsmiljø . Vælg "Visual Basic " som programmeringssprog og Windows Application Form som applikation-modus .
2
Dobbeltklik på Form1.vb at indtaste koden interface. Opret et nyt modul ved navn GetFormSize .
3
Indtast koden i den nyoprettede modul. Definer hDC , IngRetVal , ScreenX , screeny , PixX og Pixy , som du vil bruge i programmeringen : Hej
Dim HDC As Long , lngRetVal Som LongDim ScreenX Som Variant , screeny Som VariantDim PixX Som Variant , Pixy Som Variant < br >
4
Brug GetDeviceCaps functon at opnå skærmstørrelsen i pixels for X og Y : Hej
ScreenX = GetDeviceCaps ( HDC HORZRES ) screeny = GetDeviceCaps ( HDC VERTRES )
< p > Den GetDeviceCaps funktionen henter device- relaterede oplysninger for visse enhed, såsom skærmen. Det har to argumenter HDC og HORZSIZE som repræsenterer bredden af den fysiske skærm
5
Enter funktion GetDeviceCaps at beregne konvertering af pixels for X og Y: .
PixX = GetDeviceCaps ( HDC LOGPIXELSX ) Pixy = GetDeviceCaps ( HDC , LOGPIXELSY ) Konverter pixel til Points via kode : x = ( ScreenX /PixX ) * 72y = ( screeny /Pixy ) * 72
6
Indtast kode mellem mellem Sub og End Sub til re- size den form baseret på de beregnede pixels for X og Y:
Dim x As Variant , y Som VariantGetFormSize x, yLoad Form1With Form1.Top = 0.Left = 0.Width = x.Height = yEnd WithForm1.Show