大家看一看我这段代码，是在WINCC里用的。为什么在LISTVIEW里不显示结果呢。大家帮帮我！

Question

Dim aa,bb,n,cc
Dim s,oItem
Dim i,j,ListView1
Set s=HMIRuntime.Tags("MyTag")aa=Split(s.Read,",",-1)
Set ListView1=ScreenItems("ListTable")'用记录集填充标准 listview 对象
listview1.listitems.clear
ListView1.ColumnHeaders.Clear
ListView1.ColumnHeaders.Add ,, " 操作计算机",100
ListView1.ColumnHeaders.Add ,, "序号",60
ListView1.ColumnHeaders.Add ,, " 操作计算机",60
iF uBoUnD(aA)>0 THEN 
For i=0 to UBound(aa) Step 1'cc=cc & aa(i) & vbCrLf
bb=SpLit(aA(i),".",-1) Set oItem=listView1.ListItems.Add()
  
   OItem.SubItems(1)=CStr(bb(0)) 
   
   'OItem.SubItems(2)=CStr(bb(1)) 
   j=MsgBox(BB(0),vbOKCancel,"操作提示")
   n=n+1next
ELSE
End If
  j=MsgBox(N,vbOKCancel,"操作提示")

Answer 1

把这一段改变一下
 Set oItem=listView1.ListItems.Add()
  
   OItem.text=CStr(bb(0))     
   

Answer 2

我想在LISTVIEW里显示的是标头和值的对应该！你这样的话没有头，然后一连串字符串，不知道什么意思了！你帮我再想你想，我的程序那出错了！谢谢