关于窗体的问题。。。。。。。。。。。。。

Question

将form的border-style改为0，并且用了个图片代替窗体，
请问：怎样加入最小化功能的代码（不改动border-style的值）
谢谢~~

Answer 1

在窗体右上角放一个PictureBox，载入最小化的图片。Private Sub Picture1_Click()
Form1.WindowState = vbMinimized
End Sub

Answer 2

WindowState表示窗体的状态，vbMinimized是最小化。vbMaximized是最大化。

Answer 3

用上述方法只能最小化到左下角，
我想让form最小化后，进入任务栏，而不是左下角！
谢谢~

Answer 4

呵呵，你用border-style＝0是不好滴，会出现你所说的问题。
我的建议：
设置form的Contrlbox＝false
下面是最关键部分：
form1.caption=""
form1.borderstyle=1(或者2)，记住，只有1或者2才行，0/3/4/5都不行。如此依赖，运行时没有边框，但是可以最小化到任务栏。结帖罢，嘿嘿

Answer 5

首先将窗体的ShowInTaskbar 属性设为TruePrivate Sub Command1_Click()
Me.WindowState = vbMinimized'窗体最小化
End SubPrivate Sub Command2_Click()
Me.WindowState = vbNormal'窗体正常
End SubPrivate Sub Command3_Click()
Me.WindowState = VbMaximized'窗体最大化
End Sub