vb.net 读写xml方法(1)__教程 |
|
日期:2007-5-20 0:38:29 人气:90 [大 中 小] |
|
|
|
’ While reader.Read ’ Me.lboxXml.Items.Add(reader.Name + ":" + reader.Value) ’ End While ’Catch ex As Exception ’ MsgBox(ex.Message) ’Finally ’ If Not (reader Is Nothing) Then ’ reader.Close() ’ End If ’End Try Dim ds As New DataSet Try ’如果直接使用ds做datasource则不会展开datagrid,用dv则可以直接显示正确。 ds.ReadXml(xmlFile) Dim tb As DataTable Dim dv As DataView tb = ds.Tables(0) dv = New DataView(tb) DataGrid1.DataSource = dv ’DataGrid1.DataMember = "testXmlMember" ’DataGrid1.DataMember = "employeefname" ’Dim dxd As New XmlDataDocument Catch ex As Exception MsgBox(ex.Message.ToString) End Try End Sub ’保存新建xml内容事件 Private Sub btnSaveNew_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSaveNew.Click Dim myTW As New XmlTextWriter(tmpPath + "\testXmlWrite.xml", Nothing) |
|
出处:本站原创 作者:佚名 |
|
|