Windows Forms é a tecnologia de smart client para o NET Framework . . É uma seleção de bibliotecas gerenciadas que simplificam tarefas de aplicativos genéricos, como a leitura ea escrita no sistema de arquivos . No Visual Studio, você pode criar aplicativos baseados em Windows Forms , que mostram informações, aceitar a entrada e se comunicar com computadores remotos. O formulário do Windows é uma interface visual , onde você pode mostrar informações para os usuários. Você pode adicionar controles , como botões ou campos de texto ou grade de dados para o formulário. Criando um formulário do Windows ou a adição de uma nova forma janelas para um projeto é bastante simples. Em algumas circunstâncias, pode ser necessário redimensionar a forma para caber uma tela grande. Instruções
1
Clique em " Iniciar", " Todos os Programas " e " Visual Studio " para entrar no ambiente de desenvolvimento integrado . Selecione " Visual Basic ", como a linguagem de programação eo formulário de candidatura do Windows como o modo de aplicação.
2
Clique duas vezes no Form1.vb para entrar na interface de código. Crie um novo módulo chamado GetFormSize .
3
Digite o código no módulo recém-criado. Definir hDC, IngRetVal , ScreenX , screenY , Pixx e Pixy que você irá usar na programação :
Dim hdc As Long , lngRetVal Como LongDim ScreenX As Variant , screenY Como VariantDim pixx As Variant , Pixy As Variant < br >
4
Use GetDeviceCaps functon obter o tamanho da tela em pixels para X e Y :
ScreenX = GetDeviceCaps ( HDC , HORZRES ) screenY = GetDeviceCaps ( HDC , VERTRES )
A função GetDeviceCaps recupera informações relacionadas com o dispositivo para determinado dispositivo , como monitor . Ele tem dois argumentos HDC e HORZSIZE que representa a largura da tela física
5
Digite GetDeviceCaps função para calcular a conversão de pixels para X e Y: .
Pixx = GetDeviceCaps ( HDC , LOGPIXELSX ) pixy = GetDeviceCaps ( HDC , LOGPIXELSY ) Converta os pixels para Pontos via código: x = ( ScreenX /Pixx ) * 72y = ( screenY /pixy ) * 72
6
Digite o código entre entre Sub e End Sub para re- dimensionar o formulário com base nos pixels calculados para x e Y :
Dim x as Variant , y Como VariantGetFormSize x , yLoad Form1With form1.Top = 0.Left = 0.Width = x.Height = yEnd WithForm1.Show