modmain.bas

是游戏的很好的代码,为每个手写代码的开发者,游戏人才的开发也是这个的.

Attribute VB_Name = "modMain"
'**************************************************
'* Date   : 08/22/2002                            *
'* Name   : Matthias Bartelt                      *
'* Changed: 08/22/2002                            *
'* Info   : The main module.                      *
'**************************************************

'Variables must be declared
Option Explicit


'**************************************************
'*------------------------------------------------*
'*------------------DECLARATIONS------------------*
'*------------------------------------------------*
'**************************************************

'*** Classes
Public objShoot As frmShoot
Public CHero    As New clsHero
Public CSystem  As New clsSystem




'**************************************************
'*------------------------------------------------*
'*-----------------FUNCTIONS/SUBS-----------------*
'*------------------------------------------------*
'**************************************************

Private Sub Sub_Main()
'**************************************************
'* Parameter   : NONE                             *
'* Return value: NONE                             *
'* Changed     : 08/22/2002                       *
'* Info        : The first sub which is called.   *
'**************************************************

    'Show the main form
    frmHero.Show

End Sub