哦，我用了windowstate=max,可能和这个有关

找到了，加句Form1.Show好了，
windowstate=max，这个玩了我好几次了，

窗体都显示了，和show不show无关。
你上传的工程，原样未动，点击窗体后显示就这样

对呀，那你说问题在哪？

如果不加show是什么现象？

不加show它是按我原来画的窗体的大小尺寸来显示的，没用最大化的尺寸

需要在最大化下绘图，scale不要在form1.load中
把Form1.Scale (3210, 2941)-(3380, 2911)移到点击窗体事件中就OK了。

ok,感谢帮助

因为LOAD的时候，窗体是它本身的大小
Private Sub Form_Load()
Form1.Scale (3210, 2941)-(3380, 2911)
End Sub
加载完了后，窗体的属性是自动最大化。尺寸变化了。所以在LOAD时的.Scale不适用于窗体最大化后的大小了。
试试下面的代码。比较一下就知道了。
Private Sub Form_Click()
Form1.Scale (3210, 2941)-(3380, 2911)
DrawWidth = 20
'PSet (3210, 2911)
PSet (3210, 2941)
PSet (3380, 2911), vbRed
'PSet (3380, 2941)
End Sub

[ 本帖最后由 pel46585 于 2014-12-24 13:42 编辑 ]