±âÃÊ°¡ ºÎÁ·ÇÑ »óÅ¿¡¼ ÀÎÅÍ³Ý Ã£¾Æ¼ ÄÚµùÇÏ´Ùº¸´Ï Èûµå³×¿ä ¤Ð¤Ð
´ÙÀ½ ±¸Á¶ÀÇ xmlÀ» ÀÐ¾î¼ ListViewItemsV°ú ListViewItemsA °ªÀ» °¢°¢ LISTVFILTER, LISTAFILTER¶ó´Â Listview¿¡ °ªÀ» ³ÖÀ¸·Á°í Çϴµ¥¿ä.
<ArrayOfControlData>
<ListViewItemsV>
<ListViewItems>
<column1>spp</column1>
<column2>1</column2>
</ListViewItems>
</ListViewItemsV>
<ListViewItemsA>
<ListViewItems>
<column1>deshake</column1>
<column2>2</column2>
</ListViewItems>
<ListViewItems>
<column1>deshake</column1>
<column2>3</column2>
</ListViewItems>
</ListViewItemsA>
</ArrayOfControlData>
Äڵ带 ÀÌ·¸°Ô ÇÏ´Ùº¸´Ï Ä÷º¼ÇÀ» °¡Á®¿Ã ¹æ¹ýÀÌ ¾ø³×¿ä. ¹Ù·Î ListViewItems ROW¸¦ °¡Á®¿À¸é ListViewItemsV°ú ListViewItemsA¸¦ ±¸ºÐÇؼ °¡Á®¿Ã¼ö ¾øÀ¸´Ï...
Dim MyDataSet As DataSet = New DataSet
MyDataSet.ReadXml(".\Preset\" + PRESETFILENAME + ".xml", XmlReadMode.Auto)
Try
For Each dr As DataRow In MyDataSet.Tables("ListViewItemsV").Rows
Dim lvi As New ListViewItem
lvi.Text = dr.Item(0).ToString()
lvi.SubItems.Add(dr.Item(1).ToString())
LISTVFILTER.Items.Add(lvi)
LISTVFILTER.Update()
Next
Catch
End Try
Try
For Each dr As DataRow In MyDataSet.Tables("ListViewItemsA").Rows
Dim lvi As New ListViewItem
lvi.Text = dr.Item(0).ToString()
lvi.SubItems.Add(dr.Item(1).ToString())
LISTAFILTER.Items.Add(lvi)
LISTAFILTER.Update()
Next
Catch
End Try
Å×À̺í(For Each dr As DataRow In MyDataSet.Tables("ListViewItemsV"))¿¡¼
±×º¸´Ù ´õ ÇÏÀ§ ROWÀÇ ROW Ä÷º¼Ç¸¸ °¡Á®¿Ã ¼ö ÀÖ´Ù¸é ¸ðµç°Ô ÇØ°áµÉÅÙµ¥
¹æ¹ýÀÌ ¾øÀ»±î¿ä? |