VB中Form的Height如何计算

 

今天写了一个vb的软件，用于进行图片的裁剪。

因为想在load图片的时候进行自动的图像大小匹配，所以用到了Form1.Height的属性。

但是在应用中发现了一点问题：

Form的scalemode我选择了Pixel，所以对于Twip有一个15：1的换算关系。可是我每次进行

form1.height=(Piture1.Top+Picture1.Height)*15的时候，总是比图像小一块。经过查看form的height参数，才发现，原来Form.Height不是从0开始计算的。而是包括了上面的form框。也就是蓝色的那个条框。

我在本机电脑上查看的条框高度为30.

所以在设置的时候公式应该为：

form1.height=(30+Piture1.Top+Picture1.Height)*15。

 

完