Public Statement

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

Public iPublicVar As Integer
Sub ExamplePublic
    iPublicVar = iPublicVar + 1
    MsgBox iPublicVar
End Sub