VB初心者質問スレPart2

>>320
そしたら今度はクラスが足りません。"Application"と怒られました。
そこで、
Function Item_Read()
Set Application = CreateObject("Outlook.Application")
Set myInspector= new Application.ActiveInspector
MsgBox "ｱｸﾃｨﾌﾞなｱｲﾃﾑ: " & myInspector.CurrentItem.Subject
End Function
と足したら、
「プロパティが読み取り専用です」行番号２
と怒られました。
厨房ですまんです。「プロパティが読み取り専用です」でgoogle検索しても０件。。。
カンチガイしてるんでしょうか？