红袍老师,上次那个窗体最小化复原后显示算术运算错误,搞得很揪心,昨天晚上,我把代码改成以下这样的,改成后,不会弹出算术运算错误,可窗体里的控件位置没有随电脑屏幕大小发生改变,还是那个位置。窗口是笔记本上设置的,运行在台式电脑,笔记本上显示效果很满意,台式电脑就不行了,你看这个问题怎么解决?一个星期了,一直解决不了啊!
If e.Form.Width = sysinfo.width AndAlso e.Form.Height =sysinfo.height Then
For Each c As Winform.Control In e.Form.Controls
c.Left = c.Left * (e.Form.Width / vars("width"))
c.Top = c.Top * (e.Form.Height / vars("height"))
c.Width = c.Width * (e.Form.Width / vars("width"))
c.Height = c.Height * (e.Form.Height / vars("height"))
Next
End If
vars("width") = e.Form.width
vars("height") = e.Form.height