我试图读取电脑分辨率
代码如下：
Dim X As Integer, Y As Integer

        X = Screen.Width / Screen.TwipsPerPixelX
        Y = Screen.Height / Screen.TwipsPerPixelY
        

If (X = 1366) And (Y = 768) Then
。。。。。。。。。。。。。。。。。。。。。。。。。。
分辨率设为1920*1080，结果读取X=1080,Y=1080。
请问高手，哪里有错？谢谢！

结果没问题啊。。。

如过工程打开，换个分辨率，就不对了。
貌似，换个分辨率，要关掉工程，重新打开就好了。
很奇怪。