首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

listview显示数据时出现380无效的属性值,该如何处理

2012-02-24 
listview显示数据时出现380无效的属性值Set addlist lvgcms.ListItems.Add(, , Trim(Rs.Fields(故障单

listview显示数据时出现380无效的属性值
Set addlist = lvgcms.ListItems.Add(, , Trim(Rs.Fields("故障单号")))
  addlist.SubItems(1) = Trim(Rs.Fields("开始时间"))  
  addlist.SubItems(2) = Trim(Rs.Fields("结束时间"))
  addlist.SubItems(3) = Trim(Rs.Fields("过程描述"))
  addlist.SubItems(4) = Trim(Rs.Fields("状态"))
  Rs.MoveNext

开始时间 这句开始出错,注释掉后,下面的几句也出错,数据在数据库中是有的。以前也显示正常的。




[解决办法]
Set addlist = lvgcms.ListItems.Add(, , Trim(Rs.Fields("故障单号")) & "")
addlist.SubItems(1) = Trim(Rs.Fields("开始时间") & "")
addlist.SubItems(2) = Trim(Rs.Fields("结束时间") & "")
addlist.SubItems(3) = Trim(Rs.Fields("过程描述") & "")
addlist.SubItems(4) = Trim(Rs.Fields("状态") & "")
Rs.MoveNext

热点排行