WebBrowser1.Width = IIf(Form1.Width - 60 > 0, Form1.Width - 60, 1) WebBrowser1.Height = IIf(Form1.Height - 500 > 0, Form1.Height - 500, 1) 调试可以按F8键
