Types Inheritance - Naming problem

I simply place an underscore in front of all field variables which prevents naming conflicts.

Type Foo
    Field _bar:Bar
End Type