vb.net 请求参数dictionary转成xml格式

以下是将 VB.NET 请求参数 `Dictionary(Of String, String)` 转成 XML 格式的示例代码：

Imports System.Xml.Linq

Public Class Form1

    Private Sub btnConvert_Click(sender As Object, e As EventArgs) Handles btnConvert.Click
        ' 请求参数
        Dim dict As New Dictionary(Of String, String)
        dict.Add("name", "John")
        dict.Add("age", "18")
        ' 将请求参数转换成 XML
        Dim xmlData As XDocument = New XDocument(New XElement("xml", From entry In dict Select New XElement(entry.Key, entry.Value)))
        ' 输出 XML 字符串
        Console.WriteLine(xmlData.ToString())
    End Sub

End Class

这里使用了 LINQ to XML 的方式，将请求参数 `Dictionary(Of String, String)` 中的每个键值对转换成一个 XML 元素。最终将所有元素包含在一个名为 `xml` 的根元素中，然后将整个 XML 转换成 `XDocument` 对象。最后通过 `ToString()` 方法将 `XDocument` 对象转换成 XML 字符串。