' 1ter Versuch:
'-------------------------------------------------------------------
'definition 
 Dim value As Integer
 Public ReadOnly _IoException() As System.IO.IOException
 
 
'Verwendung 
 
value = _IoException.HResult
 
' fehleranzeige: Fehler	1 HResult" ist kein Member von "System.Array".
' C:\Visual Studio 2008\Projects\APPSerTest\APPSerTest\Mysecond.vb
'
' 2ter Versuch entspricht genau den Anweisungen in der msdn Dokumentation
'---------------------------------------------------------------------
    Dim value As Integer
    Protected Property HResult() As Integer
 
' Fehler: Eigenschaft ohne einen ReadOnly- oder WriteOnly-Bezeichner muss ein 
' "Get" und ein "Set" haben.	
 
    value = Me.HResult
' Fehler: Die Anweisung deklariert keine Get- oder Set-Methode.
 
    Me.HResult = value
'Fehler: Eine Anweisung kann nicht innerhalb eines Eigenschaftentexts verwendet 
' werden. Das Ende der Eigenschaft wird angenommen.

mfg
Ellen