吴翰哲

摘要： 15 14 Private Function GetXML(ByVal name As String) As String Dim path As String Dim xx As String = "" path = Application.StartupPath + "\xbd.xml" '文件的地址,相对位置 Try Dim reader As New Xml.XmlTextReader(path) reader.ReadToFollowin... 阅读全文