Sub Initialize
Dim session As New NotesSession
Dim nam As NotesName
REM Create an internet name
Set nam = session.CreateName( _
{"John B Goode" <jbg@us.acme.com> (Guitars) (Music) (East)})
REM Returns "Music"
Messagebox nam.Addr822Comment2,, "Addr822Comment2"
End Sub

関連項目

Addr822Comment2 プロパティ

用語集