16,553
社区成员
发帖
与我相关
我的任务
分享
Public Sub BindXml(ByVal xmlStr As String)
_xml = xmlStr
'处理部分
Dim xmlDoc As New XmlDocument()
xmlDoc.LoadXml(xmlStr)
Dim strBuilder As New StringBuilder()
'XslCompiledTransform(False)
With New XslTransform()
.Load(_path)
.Transform(xmlDoc, _argList, New StringWriter(strBuilder))
End With
_code = strBuilder.ToString()
End Sub