帮帮我

Question

在form_resize中改变控件的尺寸。

Answer 1

窗体中有个Resize事件,可以使用它实现,如:
Text1.Width = Form1.Width

Answer 2

通过改变尺寸来实现，在Form_Resize事件中实现dim i as integer
dim j as integer  'global varies'Form_Load
i=form.scalewidth/object.width
j=form.scaleHeight/object.Height'Form_Resize
object.left=object.left+object.left/((object.width*i)*(form.scalewidth-object.width*i))
object.top=object.top+object.top/((object.height*j)*(form.scaleheight-object.height*j))
object.width=form.scalewidth/i
object.Height=form.scaleHeight/j你试一试吧，具体的思想就是按照比例来进行缩放！我上面的程序只是提供了算法的思想，并不是源程序，你可以理解了，自己去优化！
祝成功！