VB 窗口问题

Question

     谢谢了，，我用的是VB6.0  ，因为刚学不久，，所以有点问题想请教 各位 
        就是 当我编的 界面 点击右上角的最大化时，，界面内的各组件也 想等比你放大，，
          其实上一问题 到没有什么 ，，另一个比较 奇怪的事就是，，因为我是在 宽屏上 编的程序 ，，所以 我的界面就 拉得比较 宽，，，
               但是当我 把程序 发布 后 ，安装 到别人的 电脑（非宽屏）时 ，，当程序 运行后 由于别人的电脑没有这么宽，，所以 我的界面右边的就没 有了，，就给我切割了，，， 这对于你们来说 可能是很简单的事，，是怎么搞的啊，，，谢谢各位了，，啊，，，，，555555555555555

Answer 1

您的文字排版看着有点累.
你是不是想控件等比例缩放,这个会引起字体大小美观方面的不好控制.建议你还是结合scrollbar和split分隔来控制

Answer 2

在form_resize()事件里面调用
controlname.move left, top, width, height

Answer 3

在form_resize()
通过Screen.Width \ 15 判断屏幕分辨率
通过控件.move 属性重新摆放

Answer 4

在form_resize() 
通过Screen.Width \ 15 判断屏幕分辨率
通过Screen.height \ 15 判断屏幕分辨率
 
通过控件.move 属性重新摆放
你算算比例（人脑计算）

Answer 5

等比缩放不适合多做长宽比的显示器，比较合适的方法是按照窗体大小自动锚定控件，例：
'窗体上放一个 TextBox，一个 CommandButton，一个 PictureBox
Option ExplicitPrivate Sub Form_Resize()
    If Me.WindowState = vbMinimized Then Exit Sub
    
    On Error Resume Next
    'CommandButton 右上角'
    Command1.Move ScaleWidth - 120 - Command1.Width, 120, Command1.Width, Text1.Height
    'TextBox 左上角并且宽度随 CommandButton 调整'
    Text1.Move 120, 120, Command1.Left - 240
    '余下部分全部归 PictureBox'
    Picture1.Move 120, Text1.Top + Text1.Height + 120, _
                  ScaleWidth - 240, _
                  ScaleHeight - (Text1.Top + Text1.Height + 120) - 120
    On Error GoTo 0
End Sub