(VB6)Como arir todos os form em FULLSCREEN?

Named · 5 de setembro de 2005

Boa tarde a todos!

Gostaria de saber como faço para abrir todos os form de meu programa em fullscreen.E como fazer para ele ajustar os objetos para o mesmo tamanho...

Por exemplo:

As tab ficar do tamanho da tela tambem, os frame e tal...

Valeu espero respostas!

steppenwolf · 5 de setembro de 2005

confere aí se é isso q você quer:

Public Sub FullScreen(Form As Object)
    'Rotina que coloca form Full Screen
    'Propriedades do FORM
    'BorderStyle - 3FixedDialog
    'Caption -Form1
    'ClipControls -False
    'ControlBox -False
    With Form
        .Top = 0
        .Left = 0
        .Height = Screen.Height
        .Width = Screen.Width
        .Caption = ""
    End With
End Subd With
End Sub