【发布时间】:2018-02-24 14:10:53
【问题描述】:
我不知道我是否做错了,但我认为这不正常。
我有课clsPerson
Private pNameFirst As String
Public Property Get NameFirst() As String
NameFirst = pNameFirst
End Property
Public Property Let NameFirst(sNameFirst As String)
pNameFirst = sNameFirst
End Property
现在在模块中我有程序test
Sub test()
Dim Person As New clsPerson
Person.NameFirst = "test"
End Sub
当我查看 Locals 并打开 Person 对象时,我可以看到我的私有变量 pNameFirst。
为什么?
【问题讨论】: