EDN Admin
Well-known member
<div style="color:#000000; font-family:Verdana,Arial,Helvetica,sans-serif; font-size:10px; background-color:#ffffff; margin:8px
Hi... Im using the procedure below that selects "Supplier" data based on "Sortorder" (developing w/ Windows Form, VS/VB 2010)
Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim Xml = XDocument.Load("Main.xml")
Dim queryResults = (From row In Xml.Descendants("Row") _
Where row.Attribute("Sortorder").Value = 2 _
Select row.Element("Supplier").Value)
End Sub
Now Im trying to integrate:
<br/>
TextBox1.Text = String.Join(vbCrLf, XDocument.Load("Main.xml")...<Row>.<Supplier>.Value.Split(vbLf).Where(Function(s) s.Trim() <> ""))
that should split the incoming text (e.g., supplier data associated w/ Sortorder = 2) based on vbLf in order to display the data vertically in the text box.
Any help here is much appreciated since Ive tried several things unsuccessfully.
Thank you in advance for looking.
<br/>
View the full article
Hi... Im using the procedure below that selects "Supplier" data based on "Sortorder" (developing w/ Windows Form, VS/VB 2010)
Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim Xml = XDocument.Load("Main.xml")
Dim queryResults = (From row In Xml.Descendants("Row") _
Where row.Attribute("Sortorder").Value = 2 _
Select row.Element("Supplier").Value)
End Sub
Now Im trying to integrate:
<br/>
TextBox1.Text = String.Join(vbCrLf, XDocument.Load("Main.xml")...<Row>.<Supplier>.Value.Split(vbLf).Where(Function(s) s.Trim() <> ""))
that should split the incoming text (e.g., supplier data associated w/ Sortorder = 2) based on vbLf in order to display the data vertically in the text box.
Any help here is much appreciated since Ive tried several things unsuccessfully.
Thank you in advance for looking.
<br/>
View the full article