Redimensionando a área cliente de um formulário

'Este exemplo mostra como redimensionar a área
'cliente de um formulário em tempo de execução. A
'área cliente não considera as bordas nem a barra
'de títulos do formulário.

Public Class Form1

  Private Sub Button1_Click(ByVal sender As _
    System.Object, ByVal e As System.EventArgs) _
    Handles Button1.Click

    Dim largura As Integer = 100
    Dim altura As Integer = 50

    'Redimensiona o formulário
    Me.ClientSize = New Size(largura, altura)

  End Sub

End Class