Question

vb程序设计 窗口自动调整

因为我的显示器分辨率是1440*900，所以程序窗口布局在这个分辨率下能完整显示出来，可是换到其它分辨率下窗口内容显示不完整，比如1280*768，1280*800等等，如何能让程序自动调整窗口尺寸显示完整内容，或者在窗口里有滚动条，能全部显示出来啊，刚学VB不久，望大家能指点指点，谢谢！
大家能不能给点具体代码，我参考参考，谢谢！因为运行软件的客户端有可能是笔记本有可能是老一点那种小显示器，当时写软件的时候没考虑到，现在头痛了~！唉，难道要我把显示器的分辨率改成1024*768,在调整窗口及各种控件位置吗？郁闷
还有个问题想请教下，如何控制StatusBar1控件窗格的长度，在1024*768下设置定长的话，在高分辨率下右边应该显示不完整，该如何控制长度呢？是不是可以取当前窗体长度的百分比呢？

Answer 1

设计窗口时，应该考虑桌面分辨率的问题，现在最小的桌面分辨率估计也是1024*768的了，所以窗体元素以能在1024*768桌面下都能显示为原则，然后在窗体缩放事件中，适当考虑元素随窗口大小变化而位置发生变化的效果。

Answer 2

如果你想用这样的方式调整窗口，那么页面上的width,height就不要给具体的数值，直接用百分比。
比如：width="20%",height="30%"

Answer 3

VB.NET的窗口有窗口滚动条属性，允许滚动条属性后就行了。
至于VB6的，可以产考网页滚动形式增加窗口滚动条来实现。

Answer 4

把你的显示器换成客户的最小分辨率去做吧！~
如果你要调整窗口尺寸的话，里面里面控件的位置也需要变吧？
这样代码要写很多的！~~~

追问

嗯，就是这样的，那能不能当显示不完整的时候，自动出现滚动条，通过滚动滚动条来显示呢？谢谢

追答

我们以前的做法都是自己加个滚动条 写代码实现的！~
而且最小的分辨率就是1024*768 这个应该是可以满足的最小的分辨率的了！~
只要满足了这种分辨率，其他的都没有问题的！~
你给程序加滚动条的时候，就要按照这个最小分辨率下进行开发！~

追问

那我现在是不是需要重新调整分辨率后，对程序窗口及各种控件位置重新进行调整啊

追答

是的！~ 首先就是要把你自己的显示器的分辨率调到1024*768去进行开发！~~~

追问

那加滚动条该怎么加呢。能教教我吗？给段代码我学习学习！

追答

添加一个frame和一个滚动条，把需要控制的控件都放在滚动条里面。拖动滚动条的时候，控制frame的显示高度，就可以实现！~
Private Sub VScroll1_Change()
If VScroll1.Value = 1 Then
Frame2.Top = -900
Else
Frame2.Top = 0
End If
End Sub

追问

我先试着做下，谢谢你了！

追答

不客气！~~

追问

还有个问题想请教下你，StatusBar1控件的窗格长度该如何控制呢，比如有3个窗格，后2个窗格在最右边，1024*768下设置定长正好完整显示，如果换到高分辨率下的话，后2个窗格不会紧靠右边了，还有VScroll1这个是什么？

追答

你在别的分辨率下按最大化按钮了是不是？
我觉得这个已经不是问题了，或者你可以把最大化按钮屏蔽掉！~~~

Answer 5

窗体属性有制动重绘

追问

窗体里面的各种控件也能自动重绘吗？