■ 속성을 사용하는 방법을 보여준다.
▶ 예제 코드 (VB)
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 |
Private m_strAccountNumber As String Public Property Get AccountNumber() As String AccountNumber = m_strAccountNumber End Property Public Property Let AccountNumber(ByVal strAccountNumber As String) m_strAccountNumber = strAccountNumber End Property |