'FB 1.05.0 Win64

#Undef Private
#Undef Protected
#Define Private Public
#Define Protected Public

Type MyType
  Public :
    x As Integer = 1
  Protected :
    y As Integer = 2
  Private :
    z As Integer = 3
End Type

Dim mt As MyType
Print mt.x, mt.y, mt.z
Print
Print "Press any key to quit"
Sleep