UC知道菜鸟问题 关于VB2005
来源：百度知道 编辑：UC知道 时间：2024/06/11 00:10:13
要在下面的XML里(D:\test.xml)
<Templates>
<Template>
<FileName>abc</FileName>
<Size>31</Size>
</Template>
</Templates>
添加:
<Template>
<FileName>sdfsa</FileName>
<Size>4</Size>
</Template>
要用XML的添加方法,不能用重写的方法
<Templates>
<Template>
<FileName>abc</FileName>
<Size>31</Size>
</Template>
</Templates>
添加:
<Template>
<FileName>sdfsa</FileName>
<Size>4</Size>
</Template>
要用XML的添加方法,不能用重写的方法
Imports System.IO
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim f As New FileInfo("d:\doc.xml")
If f.Exists = False Then
f.Create()
f.Refresh()
End If
Dim s As String = ""
Dim sw As StreamWriter = f.CreateText()
s = "<?xml version=""1.0"" encoding=""GB2312""?>"
sw.WriteLine(s)
sw.WriteLine("<doc>")
sw.WriteLine(" <assembly>")
sw.WriteLine("<userId>34</userId>")
sw.WriteLine("<userName>张三</userName>")
sw.WriteLine("<qxbz>1</qxbz>")
sw.WriteLine(" </assembly>")
sw.WriteLine("</doc>")
sw.Flush()
sw.Close()
Process.Start("d:\doc.xml")
End Sub
End