我想在listview控件中添加数据库数据,listview有列头:题号,章节,内容;数据库表中有相应字段:题号,章节,内容。怎么把表中相应字段的数据添加到listview中???

解决方案 »

  1.   

    :
                        While Not InfoRst.EOF
                              Set nListItem = lvListView.ListItems.Add(i, ShowType & Format(CStr(i), "000"), Format(CStr(i), "000"), "", "")
                                
                              nListItem.SubItems(1) = InfoRst.Fields(0).Value
                              nListItem.SubItems(2) = InfoRst.Fields(1).Value
                              nListItem.SubItems(3) = InfoRst.Fields(2).Value)
                              nListItem.SubItems(4) = InfoRst.Fields(3).Value
                              nListItem.SubItems(5) = InfoRst.Fields(
    4).Value                          
                              nListItem.Tag = "000"
                             
                              InfoRst.MoveNext  
                               i=i+1                  
                                  Wend
                        InfoRst.Close