如何在VB6中加载XML文件

8 浏览
0 Comments

如何在VB6中加载XML文件

我在C：\ sample project VB6 \ XMLFile1.xml中有一个XML文件，但我不知道如何在VB6中获取XML文件，下面我用C#编写了一段代码，它可以执行。

private void Form1_Load(object sender, EventArgs e)
{
    // 这段代码是用于keypress事件处理程序
    string path;
    path = System.IO.Path.GetDirectoryName(System.Reflection.Assembly.GetExecutingAssembly().GetName().CodeBase);
    myxml.Load(@"" + path + "/samplexml.xml");
    XmlNode first = myxml.SelectSingleNode("students/student");
    name.Text = first.SelectSingleNode("s_name").InnerText;
    age.Text = first.Attributes["s_age"].Value;
    gender.Text = myxml.SelectSingleNode("students/student/s_gender").InnerText;
    addres.Text = myxml.SelectSingleNode("students/student/s_addres").InnerText;
    phone.Text = myxml.SelectSingleNode("students/student/s_phone").InnerText;
    previus.Visible = false;
    // 这段代码将所有的nodelist添加到集合列表中
    items = new List();
    XmlNodeList xy = myxml.SelectNodes("students/student");
    foreach (XmlNode item in xy)
    {
        items.Add(item);
        size++;
    }
}

0