加急，加急，加急，高分求救，如何在listbox上加上标题
众位高手，麻烦你们告诉我如何在listbox上加上标题，就像windows查找出来的结果一样，可以改变每列的宽度，另外如果listbox不能实现，应该用那个控件实现，如何得到他的每列的值，如果有源程序的话，一定给我发一份，多谢 问题点数：50、回复次数：2Top
1 楼zzh（）回复于 2000-10-31 12:56:00 得分 25
可以使用ListView控件，加入列头，每一列，参考如下代码：
lvwList.ColumnHeads.Clear;
lvwList.ColumnHeads.Add "1"
lvwList.ColumnHeads.Add "2"
lvwList.ColumnHeads.Add "3"
for i=1 to 4
lvwList.ListItems(i).add CStr(i),"",1200
for j=1 to 5
lvwlist.ListItem.SubItem(j).text=j;
next i
Top
2 楼demonliang（Demon）回复于 2000-10-31 15:48:00 得分 25
用list view, 在部件里加上microsoft windows common control 6.0 里
listview1.view=lvwreport '设置它的格式
加标题(并设置宽度):
listview1.columnheaders.add ,,"head1",listview1.width * 40 /100
listview1.columnheaders.add ,,"head2",listview1.width * 60 /100
加内容:
listview1.listitems.add ,,"a11"
listview1.listitems(1).subitem(1)="a12"
listview1.listitems.add ,,"a21"
listview1.listitems(2).subitem(1)="a22"
取值:
str=listview1.listitems(1) 'str="a11"
str=listview1.listitems(1).subitem(1) 'str="a12"
注意:
list view 的 listitem 是从1开始的, 编程时小心啊!Top
