关于vb编写的软件在不同分辨率下的显示 - VB / 基础类
我用vb在1680*1050的分辨率下编好了软件。我的软件现在是全屏显示的。假如用户的显示屏不是这个分辨率的话，如何做到都能完整的显示我的软件呢？
希望大家给予指点，会尽快结贴给分。谢谢！
这个比较麻烦，如果你程序界面上的控件比较简单的话，试试这个，我用过，但也不是很好用。你可以在网上baidu一下，但没有很完美的，呵呵，如果你找到了别忘了告诉我一声
VB code:
Private Sub Form_Load()
For Each Control In Controls
Control.Tag = Join(Array(Control.Left, Control.Top, Control.Width, Control.Height))
Next
Tag = Join(Array(Width, Height))
End Sub
Private Sub Form_Resize()
Dim sF, sC
sF = Split(Tag)
For Each Control In Controls
sC = Split(Control.Tag)
Control.Move Width / sF(0) * sC(0), Height / sF(1) * sC(1), Width / sF(0) * sC(2), Height / sF(1) * sC(3)
Next
For Each Control In Controls
Control.Tag = Join(Array(Control.Left, Control.Top, Control.Width, Control.Height))
Next
Tag = Join(Array(Width, Height))
End Sub
VB6中对象窗口里的尺寸都是＂打印尺寸＂，事实上和我们平时考虑的屏幕尺寸是两码事．
楼主说的在较大的＂1680*1050的分辨率＂下摆满控件的窗体，到小分辨率下可能显示不完全．对付这种情况，比较简单的方案是像VCL那样，把窗体的滚动条显示出来，并响应滚动条的变化而移动所有控件位置．
楼上的代码看了一下没明白意思，能解释两句吗：）
恩看来没有比较完美的方案啊 按说这个功能应该很常用啊 像平时我们买的软件 很多都可以在不同的机�
相关问答：
我在类中有一个函数
Public Function DownloadAdditionalSite(SiteName As siteconfig, Directory As String, ymd As String) As Boolean
siteconfig是我自定义类型的数据，为什么会提示“只有在公共对象模块中� ......
我想把word另存为xml之后，用vb读取这个xml的内容，请问如何实现？
dim f as integer
dim b() as byte
dim s as string
dim L as long
f=freefile()
open "abc.xml" for binary access read as #f
......
vb中 现在我要把数据库里存储的一个附件的内容替换了，怎么做，只是替换我指定的位置，不是全部替换
请将问题说明白，存储字段格式，如果是Binary格式的比较麻烦，如果是字串，直接替换。最好不要进行指定位置替换� ......
问题：
现在Access数据库中有两张表TableA和TableB
TableA中有记录如下:
字段1(Name) 字段2(Num)
A 3
A 4
B 6
... ......
现在小弟在用vb6.0编写程序，遇到异步的问题，具体如下：
点击按钮A时，调用外部的dll(C++)，此dll是同步返回数据。此时如果远程未响应，我的程序界面就会卡死。因此我想到用timer来实现异步 ，但是不清楚具体的实� ......
