关于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那样，把窗体的滚动条显示出来，并响应滚动条的变化而移动所有控件位置．
楼上的代码看了一下没明白意思，能解释两句吗：）
恩看来没有比较完美的方案啊 按说这个功能应该很常用啊 像平时我们买的软件 很多都可以在不同的机�
相关问答：
在vb中如何读取Word内容(包含表格，图片，等）
竟然不是zero。
不知道怎么实现的不要说话
这个只能读文本,
VB code:
Private Sub Command1_Click()
Dim WordApp As Object
Set WordApp = CreateObject(& ......
我想把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格式的比较麻烦，如果是字串，直接替换。最好不要进行指定位置替换� ......
挺繁琐，之前发的帖子，分值太低现在重发一个。欢迎各位大侠~~
#include "stdlib.h"
#include "math.h"
#include "stdio.h"
float objfx(float x[]);
void constraint(float x[] ......
