VB的UserControl里面的窗体如何随调用窗体放大或缩小?

Question

Private Sub Form_resize()
UserControl1.Width = Me.Width'错误
UserControl1.Picture1.Width = Me.Width'错误
End Sub都是错误424,说是要求对象.错在哪呢?

Answer 1

检查:
工具栏里有没有UserControl1?
UserControl1是否已放窗体上?
UserControl1确省名称改没有?
UserControl1有没有Picture属性?

Answer 2

谢谢.以上的都有的.
UserControl1.width一样错误.

Answer 3

在用户控件usercontrol1的Resize事件中写：
Private Sub UserControl_Resize()
    On Error Resume Next
    UserControl.Width = UserControl.Parent.Width
    Picture1.Width = UserControl.Width
    On Error GoTo 0
End Sub
出错的原因是你没有定义usercontrol的picture1属性，不可以像form一样去访问usercontrol里面的控件

Answer 4

谢谢.我要实现的是当Private Sub form_Resize()时,UserControl中的picture1能够按FORM的比例放大或缩小,请问这个如何实现呢,我实现不了.
其实就是要了解UserContro的操作,比如FORM的变量要传递给UserContro,和UserContro中的变量要传递给form,和上面的属性的传递(UserContro中控件放大和缩小)问题.
请帮忙解决,谢谢.