rootnode.ChildNodes(i).Attributes(1).Value = CheckedListBox1.GetItemChecked(i).ToString
29 Next
30 doc.Save(strPathConfig)
31 End Function
32
33  Private Sub Button2_Click()Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
34 ''''需要清除CheckedListBox内的Items
35 CheckedListBox1.Items.Clear()
36 LoadConfig()
37 End Subend---
上一页 [1] [2] |
