How to delete node that matches combobox?

QuadFather · April 7th, 2010, 02:45 PM

I'm programming in VB, using Visual Studio 2008.
This is a Windows Forms program.

I know I've been asking a lot of questions lately, but I've spent hours experimenting and pouring through the msdn.microsoft help documentation. I don't know why, but it's extremely difficult for me to find answers to seemingly rudimentary questions about xml.

If anyone can point me to better resources for xml in VB, that'd be great.

GOAL: I want to delete the <Food> with the <Name> that matches the contents of ComboBox1 when I click Button1.

Objects I'm using:

ComboBox1
Button1

Here is my xml file (Foods.xml):

Code:

<?xml version="1.0" encoding="utf-8"?>
<Foods>
  <Food>
    <Name>BigMac (McDonald's)</Name>
    <Calories>485</Calories>
    <Fat>21.5</Fat>
  </Food>
  <Food>
    <Name>Burger and fries</Name>
    <Calories>90</Calories>
    <Fat>43</Fat>
  </Food>
</Foods>

Code I've tried (this is a horrible mess!):

Code:

'Dim Food As XElement = XElement.Load("Foods.xml")
        'Food.Descendants("Burger and fries").First().Remove()

        'Dim Match As XNode

        'XElement.Load("Foods.xml").<Food>.First(Function(f) f.<Name>.Value = cmbFoods.Text).Remove()
        'Dim Food As XElement = XElement.Load("Foods.xml").<Food>.FirstOrDefault(Function(f) f.<Name>.Value = cmbFoods.Text)
        'Dim Food As XElement = XElement.Load("Foods.xml")
        'Dim SelectedFood = cmbFoods.Text
        'Food.Remove()
        'Food.Descendants(SelectedFood).First().Remove()

I'm apparently no good at figuring out xml in VB.

Please help!

UPDATE

Here is my latest failed attempt:

Code:

Dim Food As XDocument = XDocument.Load("Foods.xml")
        Food.Descendants().Where(Function(f) f.<Name>.Value = cmbFoods.Text).Remove()

samjudson · April 8th, 2010, 03:20 AM

Some or all of the above may work, but they are only editing the in memory storage. You then need to call XElement.Save to save the changes to file.

So in the last example, simply put the following after them:

Code:

Food.Save("Foods.xml")

QuadFather · April 8th, 2010, 08:40 AM

I feel silly.