vbAccelerator - Contents of code file: mMain.bas

Attribute VB_Name = "mMain"
Option Explicit

Private Declare Sub InitCommonControls Lib "COMCTL32.DLL" ()

Public Sub Main()

   ' we need to call InitCommonControls before we
   ' can use XP visual styles.
   On Error Resume Next
   InitCommonControls
   
   ' now start the application
   On Error GoTo 0
   frmImageListDragDrop.Show
   
End Sub