VB 版 (精华区)

用screen的两个属性xpoint%=screen.width/screen.TwipsPerPixelX
ypoint%=screen.height/scree.twipsperpixelY
a%=msgbox(trim(str$(xpoint)) & "x" & trim(str$(ypoint)))
呵呵,若有笔误.望兄台见谅!
也可以用api函数得到,不过麻烦多了,这里就不给出了


发信人: fhawk (大头鹰), 信区: VB
标  题: 我怎么样在VB在得到Windows的分辨率？？？
发信站: 哈工大紫丁香 (2000年07月31日09:39:24 星期一), 站内信件

如题，我在程序中要用到Windows的分辨率，但不知道我该调用API函数的哪一个，Than
k you very much.

--



 a

※ 来源:·哈工大紫丁香 bbs.hit.edu.cn·[FROM: hpwei.hit.edu.cn]