PRIVATE:（访问控制）

• 来源: https://www.freebasic.net/wiki/wikka.php?wakka=KeyPgVisPrivate
• 最后更新: 2022-04-23

---

在 Type 或 Class 中指定私有成员访问控制

语法

Type typename

Private:

member declarations

End Type

参数

typename

Type 或 Class 的名称

member declarations

字段、函数或枚举的声明

描述

Private: 表示其后的 member declarations（成员声明）具有私有访问权限。

私有成员只能从其所属 Type 或 Class 的成员过程内部访问。从此类成员过程内部来看，就好像受保护成员实际上是公共的，无论对哪个对象应用访问运算符都是如此。

Private: 之后的 member declarations 保持私有，直到给出不同的访问控制修饰符，如 Public: 或 Protected:。

Type 声明中的成员默认为 Public:（如果未给出成员访问控制修饰符）。

示例

start GeSHi

Type testing
  number As Integer
  Private:
    nome As String
  Declare Sub setNome( ByRef newnome As String )
End Type

Sub testing.setnome( ByRef newnome As String )
  '' 这是正确的。我们在该类型的成员函数内部
  This.nome = newnome
End Sub

Dim As testing myVariable

'' 这是正确的，number 是公共的
myVariable.number = 69

'' 这将产生编译错误
'' - nome 是私有的，我们试图在此 TYPE 的任何成员函数之外访问它
'' myVariable.nome = "FreeBASIC"

end GeSHi

方言差异

• 仅在 -lang fb 方言中可用。

与 QB 的区别

• FreeBASIC 新增

参见

• Private
• Public: (访问控制)
• Protected: (访问控制)
• Type

返回 目录