Public Class Form1
Private _datapath As String = "moveis.xml"
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.DataSet11.ReadXml(_datapath)
End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Me.DataSet11.WriteXml(_datapath)
End Sub
End Class