經 試 驗 ， 使 用 先 隱 藏 后 顯 示 的 方 法 的 確 有 很 嚴 重 的 閃 爍 感 ， 可 以 不 使 用 它 。 下 面 的 代 碼 是 經 過 測 試 的 ， Form1使 用 缺 省 屬 性 。 
    Sub main() 
    Dim i, j 
    Const CX = 7700 
    Const CY = 5500 
    With Form1 
     .Show 
     For i = 0 To 10 
     Form1.Left = 7700 - i * 700 
     Form1.Top = 5500 - i * 500 
     Form1.Height = i * 1000 
     Form1.Width = i * 1400 
     Form1.Refresh 
     Next i 
    End With 
    End Sub 
<END>    
    不 要 單 獨 設 置 Left、 Height、 Top、 Width， 可 以 使 用 Move方 法 ， 如 ： 
    me.move me.left-10,me.top-10,me.width+20,me.height+20 
<END>