如何使用VB.net代码从XML文件创建XSD文件

Question

如何使用vb.net代码从XML文件生成xsd文件？

Answer 1

我找到了this answer并将其转换为vb.net

Using reader = XmlReader.Create("filename.xml")
    Dim schemaInference = New XmlSchemaInference()
    Dim schemaSet = schemaInference.InferSchema(reader)
    For Each s As XmlSchema In schemaSet.Schemas()
        Using writer = XmlWriter.Create("schema.xsd")
            s.Write(writer)
        End Using
    Next
End Using