关于窗口座标的问题？在线实时！·

Question

我在做一个控件时需要将原窗口的座标体系的高改大一点。
也就是说将原窗口的中
move 0,0
在执行一段代码后改为：
move 100,0
因为我要将上面100作为扩展标题

Answer 1

Private Sub Command3_Click()
    Dim v As Object
    Me.Height = Me.Height + 100
    For Each v In Me.Controls
        v.Top = v.Top + 100
    Next
End Sub

Answer 2

他的意思是要保留上面100的，就是本来坐标获取为100，0的地方，现在获取为0，0这样就把每次获取的X,Y中的X坐标－100就可以了

Answer 3

当我们在窗口load里move一个控件0,0时.该控件就行移动到窗口标题栏下面点左上角
我的意思是有什么办法.能在move 0,0里让该控件移动到窗口区0,100的位置.

Answer 4

为什么我每次问的问题都是不了了之呢.真是有意思当我们在窗口load里move一个控件0,0时.该控件就行移动到窗口标题栏下面点左上角
我的意思是有什么办法.能在move 0,0里让该控件移动到窗口区0,100的位置.

Answer 5

Me.Scale (0, -100)-(Me.Width, Me.Height - 100)