Windows Forms är den smarta klient-teknik för NET Framework . . Det är ett urval av hanterade bibliotek som förenklar generiska tillämpningar uppgifter såsom att läsa och skriva till filsystemet . I Visual Studio kan du skapa Windows Forms baserade program som visar information acceptera indata och kommunicera med fjärrdatorer . Den Windows- Form är ett visuellt gränssnitt där du kan visa information till användarna . Du kan lägga till kontroller såsom knappar eller textfält eller datarutnät till formuläret . Skapa ett Windows-formulär eller lägga till en ny Windows-formulär till ett projekt är ganska enkelt . I vissa fall kan du behöva ändra storlek ett formulär för att passa en stor skärm . Instruktioner
1
Klicka på "Start ", " Alla program " och " Visual Studio " för att ange den integrerade utvecklingsmiljön . Välj " Visual Basic " som programmeringsspråk och Windows ansökningsblankett som ansökan läget .
2
Dubbelklicka på Form1.vb att ange koden gränssnittet . Skapa en ny modul som heter GetFormSize .
3
Ange koden i den nyskapade modulen . Definiera HDC , IngRetVal , screenx , Screeny , Pixx och pixy som du kommer att använda i programmeringen :
Dim HDC As Long , lngRetVal Som LongDim screenx As Variant , Screeny Som VariantDim Pixx As Variant , PIXY As Variant
4
Använd GetDeviceCaps functon att erhålla skärmstorlek i pixlar för X och Y :
screenx = GetDeviceCaps ( HDC , HORZRES ) Screeny = GetDeviceCaps ( hdc , VERTRES ) katalog
Den GetDeviceCaps funktionen hämtar enhet - relaterad information för viss enhet t.ex. skärmen . Den har två argument HDC och HORZSIZE som representerar bredden av den fysiska skärmen
5
Ange funktion GetDeviceCaps att beräkna omvandlingen av pixlar för X och Y : .
Pixx = GetDeviceCaps ( hdc , LOGPIXELSX ) pixy = GetDeviceCaps ( hdc , LOGPIXELSY ) Konvertera pixlarna till Points via kod : x = ( screenx /Pixx ) * 72y = ( Screeny /pIXY ) * 72
6
Ange koden mellan mellan Sub och End Sub ändra storlek på formulär som baseras på de beräknade pixlar för x och Y :
Dim x As Variant , Y VariantGetFormSize x , yLoad Form1With Form1.Top = 0.Left = 0.Width = x.Height = yEnd WithForm1.Show
