[2005] Listbox error

[kiwis]

I have this code....

    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
        ListBox1.Items.Clear()
        Dim Lct As String = My.Settings.Location

        ' start xml to listbox
        Dim XDoc As New Xml.XmlDocument
        Try
            'LOAD FILE INTO OBJECT
            XDoc.Load(Lct & "\newslist.xml")
            'LOOP ALL THE CHILD NODES OF THE DOCUMENT'S DOCUMENTELEMENT PROPERTY
            For Each XNode As Xml.XmlNode In XDoc.DocumentElement.ChildNodes
                Dim vv As Integer = XNode.Item("id").InnerText
                ListBox1.Items.Add(XNode.Item("title").InnerText & " (" & XNode.Item("id").InnerText & ")")

            Next
        Catch ex As Exception
            MessageBox.Show(ex.Message)
        End Try
        ' end xml to listbox

    End Sub

But i get the error

"Object reference not set to an instance of an object"

What's wrong??