Imports System.Runtime.CompilerServices
 
Module LinqToXMLExtension
 
   Public GlobalNameSpaceToUse As XNamespace
 
   <Extension()> _
   Public Function n(ByVal x As XElement, ByVal value As String) As XElement
      Return x.Element(GlobalNameSpaceToUse + value)
   End Function
 
End Module

Payment.LocalInstrumentCode = PmtInfNode.Element(m_NsToUse + _
  "PmtTpInf").Element(m_NsToUse + "LclInstrm").Element(m_NsToUse + "Cd")

Payment.LocalInstrumentCode = PmtInfNode.n("PmtTpInf").n("LclInstrm").n("Cd")

Gru?
---------------------------------------------------
Snoopy sagt - vb@rchiv find ich gut...
Schon gesehen? OSMMapViewer V2 Control