VB程序在宽屏和方屏显示器显示的问题?
用Vb设计的软件,放在宽屏,分辨率为1600*900正常显示,1440*900和1366*768时有几个Label的内容被遮盖了;如果放在方屏中,分辨率为1024*768时,label内容被遮盖的更严重?这个是不是由于显示器的尺寸造成的,怎么解决?代码如下:
在Form1_load中,添加的如下代码
Form1.Left = 0
Form1.Top = 0
Form1.Height = Screen.Height
Form1.Width = Screen.Width
intHeight = Screen.Height \ Screen.TwipsPerPixelY
intWidth = Screen.Width \ Screen.TwipsPerPixelX
int_Heng = intWidth / 800
int_Zong = intHeight / 600
Lab(1).Left = 1150 * intHeng
Text1.Left = 1700 * intHeng
Text1.Top = 300 * intZong
Text1.Width = 500 * intZong
Lab(2).Left = 2250 * intHeng
Text2.Left = 2800 * intHeng
Text2.Top = 300 * intZong
Text2.Width = 500 * intZong
Lab(3).Left = 3350 * intHeng
Text3.Left = 4200 * intHeng
Text3.Top = 300 * intZong
Text3 = 500 * intZong
[解决办法]
你尺寸计算的代码有问题,自己调试下。
[解决办法]
用API去分辨率。
[解决办法]
不合理啊,那个800和600的常数有问题啊