使vb窗体可以自适应屏幕分辨率的大小

4星 · 超过85%的资源
所需积分/C币: 48
浏览量·799
DOC
31KB
2013-04-12 21:02:58 上传
身份认证 购VIP最低享 7 折!
u010273623
  • 粉丝: 0
  • 资源: 1
前往需求广场,查看用户热搜
上传资源 快速赚钱
精品专辑
内容简介:使 vb 窗体可以自适应屏幕分辨率的大小Option ExplicitPrivate ObjOldWidth As Long '保存窗体的原始宽度Private ObjOldHeight As Long '保存窗体的原始高度Private ObjOldFont As Single '保存窗体的原始字体比'在调用 ResizeForm 前先调用本函数Public Sub ResizeInit(FormName As Form) Dim Obj As Control ObjOldWidth = FormName.ScaleWidth ObjOldHeight = FormNam...