Public Statement

सार्वजनिक VarName[(सुरु देखि अन्त्य)] [As VarType][, VarName२[(सुरु देखि अन्त्य)] [As VarType][,...]]

Public iPublicVar As Integer

Sub ExamplePublic

    iPublicVar = iPublicVar + 1

    MsgBox iPublicVar

End Sub