这种情况VB怎么不自动加载并显示应用程序的启动窗体呢?(在线等待)

Private Sub Command1_Click()
Form1.Cls
End Sub

From1为启动窗体
Private Sub Form_Load()
Dim a#
a = 10000000000000#
For i = 1 To a
Print i;
If i Mod 20 = 0 Then
Print
End If
DoEvents
Next
End Sub
这种情况VB怎么不自动加载并显示应用程序的启动窗体呢?必须在窗体的加载事件中加入Show方法.
还有若在窗体的加载事件中用Print语句,也要加入Show方法?