WITH ThisForm.List1
            .Top = ThisForm.Button1.Top + ThisForm.Button1.Height + 5
            .Left = 5
            .Height = Thisform.Height - .Top - 5
            .Width = ThisForm.Width - .Left - 5
这段的Button和Height， Width为什么都用thisfom? 按理说.Height = Thisform.Height - .Top - 5的Height用的是同一个Thisform 为什么我把=后面那个thisform去掉程序能运行但是改变主框大小的时候出现这个：

WITH ThisForm.List1
    .Height = Thisform.Height - .Top - 5
ENDWITH
当前WITH在List1内，.Height和.Top都是List1的，.Height是List1的高度，.Top是List1在Form中的顶坐标。这样你看运算：List1的新Height等于窗体的Height减去List1的顶部，然后再减去底部留空的5。你去掉了前面的Thisform.，用List1旧的高度减自己的顶部留空，再减5，那可能是负数（结合前面.Top是怎么算的就知道了），于是错了。

哦你的意思是
WITH ThisForm.List1
    .Height = Thisform.Height - .Top - 5
ENDWITH
这两个thisform不是一样的.xxx默认的是with上的那个 如果直接写thisform就是指鼠标点的那个表单（类）， 是吗？

ThisForm都是同一个，是指当前实例对象的窗体。上面那句代码其实就是ThisForm.List1.Height = ThisForm.Height - ThisForm.List1.Top - 5

呵呵 这样写更明白了
呀呀呀 屁股都坐麻了 老大俺要睡觉了 今天就问到这里吧 非常谢谢你啊
如果你也睡了 就一起睡啊 晚安 嘿嘿
如果你还要坚持上树 上杯热茶
OK 洗洗睡了

你又不是女生，跟我一起睡干嘛。

同一个时间睡啊?  你老想歪啊 好了bye......