Tady je kod toho tlačitka co funguje:

Private Sub PřizpůsobitVelikostiToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PřizpůsobitVelikostiToolStripMenuItem.Click
        WebBrowser.Width = Me.Width - 20
        WebBrowser.Height = Me.Height - 122
    End Sub