vbAccelerator - Contents of code file: WinSubHook_Samples_ApiWindow_mMain.bas

Attribute VB_Name = "mMain"
Option Explicit

Private Sub Main()
  Dim Demo As cDemo
  Set Demo = New cDemo
  Set Demo = Nothing
End Sub