vb.net – 在此代码中导致“CA2202：多次不处置对象”的原因是什

现在在其他情况下,我通过删除[对象]来修复此警告.不需要关闭.但在这种情况下,我无法看到需要更改的内容,而help for the warning在准确的情况下并不能完全提供信息.它是如何造成的或如何解决它.

究竟是什么导致警告显示,我如何重构以避免它？

''' <summary>
''' Serialize an object without adding the XML declaration,etc.
''' </summary>
''' <param name="target"></param>
''' <returns></returns>
''' <remarks></remarks>
Public Shared Function SerializeElementToText(Of T As New)(target As T) As String
    Dim serializer As New XmlSerializer(GetType(T))
    'Need to serialize without namespaces to keep it clean and tidy
    Dim emptyNS As New XmlSerializerNamespaces({XmlQualifiedName.Empty})
    'Need to remove xml declaration as we will use this as part of a larger xml file
    Dim settings As New XmlWriterSettings()
    settings.OmitXmlDeclaration = True
    settings.NewLineHandling = NewLineHandling.Entitize
    settings.Indent = True
    settings.IndentChars = (ControlChars.Tab)
    Using stream As New StringWriter(),writer As XmlWriter = XmlWriter.Create(stream,settings)
        'Serialize the item to the stream using the namespace supplied
        serializer.Serialize(writer,target,emptyNS)
        'Read the stream and return it as a string
        Return stream.ToString
    End Using 'Warning jumps to this line
End Function

我试过这个,但它也不起作用：

Using stream As New StringWriter()
        Using writer As XmlWriter = XmlWriter.Create(stream,settings)
            serializer.Serialize(writer,emptyNS)
            Return stream.ToString
        End Using
    End Using 'Warning jumps to this line instead