請教各位.......一個很笨的問題
ListView的最大Colum數是不是有限制?
我SubItems只能填入6欄....為什麼
6、7show不出來
Do Until oRs.EOF
Set item = lvwITMResult.ListItems.Add(, , oRs.Fields("ITM_NO"))
item.SubItems(1) = oRs.Fields("ITM_DESC")
item.SubItems(2) = oRs.Fields("ITM_TYPE")
item.SubItems(3) = oRs.Fields("EXP_DAY")
item.SubItems(4) = oRs.Fields("ITM_UM")
item.SubItems(5) = oRs.Fields("SAFE_QTY")
'' item.SubItems(6) = oRs.Fields("LOT_QTY")
'' item.SubItems(7) = oRs.Fields("PLT_QTY")
oRs.MoveNext
Loop
ListView的最大Colum數是不是有限制?
我SubItems只能填入6欄....為什麼
6、7show不出來
Do Until oRs.EOF
Set item = lvwITMResult.ListItems.Add(, , oRs.Fields("ITM_NO"))
item.SubItems(1) = oRs.Fields("ITM_DESC")
item.SubItems(2) = oRs.Fields("ITM_TYPE")
item.SubItems(3) = oRs.Fields("EXP_DAY")
item.SubItems(4) = oRs.Fields("ITM_UM")
item.SubItems(5) = oRs.Fields("SAFE_QTY")
'' item.SubItems(6) = oRs.Fields("LOT_QTY")
'' item.SubItems(7) = oRs.Fields("PLT_QTY")
oRs.MoveNext
Loop
文章標籤
全站熱搜

Column也要自己增加上去! .ColumnHeaders.Add
哈.....我自己耍笨.....ColumnHeaders.Add被我mark掉了.....難怪show不出來..><