Frage Klassenmodul

' Klasse CPerson_02
Option Explicit
Private m_strName As String
Private m_astrArbeitsgebiete() As String
Property Get Arbeitsgebiete() As String()
  Arbeitsgebiete = m_astrArbeitsgebiete
End Property
Property Let Name(strWert As String)
  m_strName = strWert
End Property
Property Get Name() As String
  Name = m_strName
End Property
Private Sub Class_Initialize()
  ReDim m_astrArbeitsgebiete(1 To 3)
End Sub
Ich möchte also das mehrdimensionale Datenfeld .Arbeitsgebiete füllen. Allerdings erscheint bei der Kompilierung der Fehler 'Zuweisung an schreibgeschützte Eigenschaft nicht möglich'.
Wer weiß Rat?
Und wo gibt es weitere Einführungen in Klassenmodule im Internet?
Danke
Christoph