Question

1 我用vb做了一个软件，里面有一个最小化按钮，但是如何使它能让窗体最小化呢？

2 我如何才能让一个loading界面过10秒后自动跳到主界面
（loading窗体名为frmLoading，主界面窗体名称为frmMain）
高手帮忙！！！！！！！！！！急
很感谢三位（gaominyyr）（35090773）（nhednwfnh） 但是由于只能选一个，我也没有办法，我还有一个问题，将很快提出，谢谢！

Answer 1

在loading窗口里面添加一个timer控件
让窗口最小话命令 Me.WindowState = 1End
代码如下
Dim st As Integer
Private Sub Form_Load()
Timer1.Interval = 1000
End Sub

Private Sub Timer1_Timer()
st = st + 1
If st = 10 Then
frmMain.Show '显示主界面
unload me '隐藏frmloading 界面
End If
Sub

Answer 2

（1）在frmLoading窗体上加一个时钟控件Timer1。
（2）在属性窗口中设置Timer1的Interval属性值。
Timer1.Interval=10000 '事件触发周期为10秒
（3）在代码窗口中对Timer1进行事件编程。代码如下：
Private Sub Timer1_Timer()
frmMain.Show
Unload Me
End Sub

Answer 3

在窗体的 windowstate 属性选项控制。

代码操作：
窗体名.WindowState = X （X有三个值 0、1、2） 自己选好了

Answer 4

hide就OK了