myMain.bas

 Attribute VB_Name = "basMyMain"
' MyMain.bas
'
' By Herman Liu

Option Explicit

Public gLeftMargin As Integer
Public gRightMargin As Integer
Public gTopMargin As Integer
Public gBottomMargin As Integer

Public gprint As Boolean


Sub Main()
    gLeftMargin = 1                   ' Initialize
    gRightMargin = 1
    gTopMargin = 1
    gBottomMargin = 1
    gprint = False
    frmFrame.Show
End Sub

Project Homepage: