求针对不同分辨率的兼容算法！该如何解决

求针对不同分辨率的兼容算法！
如题，假如我想点击某个点，在不同分辨率下，这个点发生了变化，
我想求个算法，能在任何分辨率下都能指向那个我指定的坐标点。

[解决办法]

VB code

Private Sub Form_Load()w = Screen.WidthDebug.Print wh = Screen.WidthDebug.Print hx = 2500'屏幕坐标点(x,y)y = 3000'屏幕坐标点(x,y)的像素值坐标为(px,py),它随分辨率的改变而改变px = x / Screen.TwipsPerPixelXpy = y / Screen.TwipsPerPixelXDebug.Print pxDebug.Print pyEnd Sub