2009-06-10 11 views
-1

このコードは動作していました。何らかの理由で、今は動作しなくなりました。私はこのプロジェクトを実行すると、次のコードが実行されるはずですが、そうではありません!助けてください。プロジェクトを実行しているときに、すべてのform_loadコードが実行されない

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 
    Dim xmldoc As New System.Xml.XmlDocument() 

    'Load from file 

    xmldoc.Load("http://sites.google.com/site/shadchanproject/Home/lots1.xml") 

    'Get a list of all the child elements 

    Dim nodelist As XmlNodeList = xmldoc.DocumentElement.ChildNodes 

    'Parse through all nodes 

    For Each outerNode As XmlNode In nodelist 

     ListBox1.Items.Add(outerNode.Name) 
    Next 
End Sub 
+0

Form_loadイベントは引き続き配線されていますか? –

+0

問題は何ですか?実行しないとどういう意味ですか? xmldocはURLからxmlをロードできますか? – shahkalpesh

答えて

1

そのdiffiucltあなたはForm1_Loadメソッドのみを掲載しましたので、間違っているものを特定するために言うことができるようにします。あなたはまた、あなたの質問に少し明白にする必要があります。メソッドはまったく実行されますか?デバッガでブレークポイントを設定しようとしましたが、その方法を実行しましたか?

コードをtry catchブロックにラップして、コードが例外をスローしているかどうかを確認することもできます。だからあなたのコードは次のようになります。

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 

     Dim xmldoc As New System.Xml.XmlDocument() 

     Try 
      'Load from file 
      xmldoc.Load("http://sites.google.com/site/shadchanproject/Home/lots1.xml") 
     Catch ex As Exception 
      MessageBox.Show(ex.Message, "Problem loading the document") 
     End Try 

     Try 
      'Get a list of all the child elements 
      Dim nodelist As XmlNodeList = xmldoc.DocumentElement.ChildNodes 

      'Parse through all nodes 
      For Each outerNode As XmlNode In nodelist 

       ListBox1.Items.Add(outerNode.Name) 
      Next 
     Catch ex As Exception 
      MessageBox.Show(ex.Message, "Problem with the nodes.") 

     End Try 
    End Sub 

私はあなたがあまりにもそれをチェックすることもできますので、問題はちょうどしかし、あなたのXML文書にかもしれないと思います。

+0

ありがとう!あなたは正しいです、私はTRYのことを行いました、そして、それは私のXMLに無効な文字があったと言いました。無効な文字があってもVBにファイルを読み込ませることは可能ですか? –

関連する問題