2016-09-01 4 views
0

Мне действительно нужна ваша помощь.datagridview для xml-файла vb.net

Я уже написал код из текстового окна +, чтобы создать и записать в xml-файл. Поэтому теперь я пытаюсь применить те же данные, но используя datagridview (без текстового поля).

Я все еще новичок, и я действительно не знаю, как применять ячейку, индекс и все о datagridview.

Например, мои данные в TEXTBOX 1 в качестве идентификатора, ТЕКСТБОКС 2 как ИМЯ, поэтому я перехожу в столбец DATAGRIDVIEW (0) как идентификатор, столбец (1) в качестве ИМЯ, поэтому каждый раз пользовательский ключ в ИД и ИМЯ в каждой строке ID/назовёшь идет в файл XML, нажав на кнопку

Так что я действительно нужна ваша помощь, как применить это вещи вот мой код:

<i>Dim settings As New XmlWriterSettings() 
    settings.Indent = True 
    Dim XMLwrt As XmlWriter = XmlWriter.Create("Device.cfg", settings) 
    With XMLwrt 

     'Write the XML declaration 
     .WriteStartDocument() 


     'Write the root element 
     .WriteStartElement("DEVICES") 


     'This will display all elements that user ADD from the button2 
     Dim i As Integer = 0 
     'For i As Integer = 0 To ioDevice.Length 
     Do 
      'Start New Device 
      .WriteStartElement("DEVICE") 


      'Write the attribute element 
      .WriteStartAttribute("NAME") 
      .WriteString(ioDevice(i).NAME) 
      .WriteEndAttribute() 


      .WriteStartAttribute("DLL") 
      .WriteString(ioDevice(i).Dll) 
      .WriteEndAttribute() 




      .WriteString(ioDevice(i).ID) 


      'The end of Device 
      .WriteEndElement() 
      i = i + 1 


      'the condition where the program should stop looping 
     Loop Until (i = ioDevice.Length) 


     'Close the XMLTextWritter 
     .WriteEndDocument() 
     .Close() 

    End With 
</i> 



    <i>Private Sub TextBox1_TextChanged(sender As System.Object, e As System.EventArgs) Handles TextBox1.TextChanged 

    device.ID = Me.TextBox1.Text 
</i> 



<i>Private Sub TextBox2_TextChanged(sender As System.Object, e As System.EventArgs) HandlesTextBox1.TextChanged 

    device.NAME = Me.TextBox2.Text 
</i> 

ответ

0

Если DataSource является DataSet, вы можете сохранить напрямую к XML:

Dim sFilePath As String = "ENTER A VALID FILEPATH" 
NorthwindDataSet.WriteXml(sFilePath) 

Взято из MSDN: How to: Save a Dataset as XML

Смежные вопросы