Question

vb“实时错误380，无效属性”问题。

private sub form_resize()
with text1
.height=form1.scaleheight-picture1.height ‘此行变黄色
.width=form1.scalewidth
end with
command7.left=form1.scalewidth-command7.width-50
end sub

以上是代码的一部分，运行时没问题，功能都能实现，但把form最小化时看到一个“事实错误380，无效属性”的警告，请大虾们看看是怎么回事，先谢谢了。
知道答案了

Answer 1

在picture1前面加上所在的窗体的名称 form1.picture1.height ，如果在当前窗体就是控件名称和你设置的不一样。

Answer 2

form最小化时form1.scaleheight和form1.scalewidth的值为0，导致text1.height和command7.left的赋值为负数，是无效属性赋值。