为什么运行后窗体变小？

.。。。。。。。。。什么意思

你的意思是FORM窗体是小的吧，要点击最大化才能放大。拖放控件时不要将窗体最大化就可以了

编写代码是时我把窗体拖到我想放的地方，运行后变小了，还不是我拖放到地方，太无奈了

我不明白你所說的變小是，窗體跟你設計的大小不同，還是最小化

Private Sub Form_Resize()
    Dim i
    On Error Resume Next
    If Me.ScaleWidth < 13740 Then Me.Width = 13740
    If Me.ScaleHeight < 8595 Then Me.Height = 8595
End Sub