The Slash Screen
'For an indented version of the code, see the Printable Final Report.
'The Cancer Modeling Project: Tracking Cancer Development and Movement
'Punit Shah and Karalyn Baca
'Team 004
' Albuquerque Academy
'AiS 2004-2005
'Parts of code in this section (frmSplahs) were generated automatically by VB
'Code written in Microsoft Visual Basic 6.0, line comment charecter is '
'Code for: frmSplash
'Purpose of module: Splash Screen
Option Explicit 'Force variable declerations
Private Sub Form_KeyPress(KeyAscii As Integer)
Call HideTheForm
End Sub
Private Sub Frame_Click()
Call HideTheForm
End Sub
Private Sub imgLogo_Click()
Call HideTheForm
End Sub
Private Sub tmrHideSplash_Timer()
Call HideTheForm
End Sub
Private Sub HideTheForm()
Static HiddenOnce As Boolean
Unload Me
tmrHideSplash.Enabled = False
If HiddenOnce = False Then
frmInput.Show
End If
HiddenOnce = True
End Sub
