PUBLIC
This keyword is used for declaring the accessibility of a global method , variable or property.
A public variable, method or property can be used outside of the class code.
مثال
PUBLIC iCounter AS Integer
PUBLIC SUB btnTest_Click()
DIM iLocal AS Integer
iCounter = iCounter + 1
iLocal = iLocal + 1
txtField1.Text = CString(iCounter)
txtField2.Text = CString(iLocal)
PRINT "PUBLIC:"; iCounter; " DIM:"; iLocal
END
PUBLIC:1 DIM:1
PUBLIC:2 DIM:1
PUBLIC:3 DIM:1
PUBLIC:4 DIM:1