# Re: 抓萤幕高度和宽度来运算设定

Posted by 笨鸟 on October 12, 1998 at 02:15:32:

In Reply to: 请教各位前辈，如何将所开发程式的 "From" 在不同解析度下皆可保持相同的画面呢?? posted by Rong on October 11, 1998 at 15:33:28:

: 为什么我在VB开发好的程式(解析度为640*480)，安装在800*600解析度的作业
: 平台上时，画面不能自动调整，我应该怎么办才好????
: 我不可以教教我!!求求你们~~~~
private sub mdiform_load()
me.height=screen.height*0.75
me.width=screen.width*0.75
me.move(screen.height-me.height)/2, _
(screen.width-me.width)/2

addform
end sub
如此可将 mdi表单 设成萤幕宽的 3/4,并把位置移到萤幕
中间,在任何解析度的萤幕都会保持比例和位置

Follow Ups:

- Re: 抓萤幕高度和宽度来运算设定 鸡嫂 ~~~ *^_^* 09:04:27 10/12/98 (1)
  - Re: 抓萤幕高度和宽度来运算设定 北极熊 16:54:48 10/21/98 (0)