Question

在VB6中，我创建了一个包含一些文本框，列表框和命令按钮的表单。我使用

之类的东西设置了所有这些控件的X-Y位置

control2.Top = form.Height * 0.50   'sets the Y-position
control2.Left = form.Width * 0.35   'sets the X-position

control3.Top = form.Height * 0.50
control3.Left = form.Width * 0.45

然而，当我点击我的应用程序的“最大化”按钮时，所有控件都停留在同一个位置，但是向窗体的左上角移动了一点。在此期间，单击“最大化”还会在表单的右下角创建大量空白区域。

如何点击“最大化”按钮（右上角看起来像一个空方块）按钮通知我的程序form.Height和form.Weight已经改变，一切都需要重绘？

或者，是否还有另一种方法可以消除所有控件向左上角的移动，并消除向右下角创建新的空白区域？在此先感谢您的帮助。

Answer 1

您的表单中有一个名为“调整大小”的事件。每次表单调整大小时都会触发该事件。

Private Sub Form_Resize()
    'Insert your code here
End Sub

单击“最大化”按钮后如何重绘表单？

1 个答案: