可在form_load里边添加,如下:
'初始化
listview1.fullrowselect
=
true
'(允许整行选择)
listview1.gridlines=true
'(显示网格)
listview1.checkboxs=true
'显示checkboxs框
listview1.view=3
'以报表形式显示
listview1.columnheaders.clear
listview1.columnheaders.add
1,
,
"姓名",
1000
listview1.columnheaders.add
2,
,
"性别",
500
listview1.columnheaders.add
3,
,
"职称",
1500
listview1.columnheaders.add
4,
,
"电话",
1000
第二步,添加数据
dim
itmx
as
listitem
set
itmx
=
lvw.listitems.add(参数,参数,参数,……)
'这些参数都可以为空,具体你可以看看msdn
itmx.text="李四"
itmx.subitems(1)
=
"雄性"
itmx.subitems(2)
=
"大将军"
itmx.subitems(3)
=
"10086"
第三步,取得行数据
private
sub
listview1_itemclick(byval
item
as
mscomctllib.listitem)
text1
=
item.text
text2
=
item.subitems(1)
text3
=
item.subitems(2)
text4
=
item.subitems(3)
end
sub
试一试就能知道怎么用了,快去试试吧
('" + Trim(Label4.Text) + "','" + Trim(ListView1.SelectedItems.Item(0).Text) + "','" + Trim(ListView1.SelectedItems.Item(1).Text) + "' 这个里面每个变量多了个单引号吧。。。 注意检查下。。。。语法。。。SQL的欢迎分享,转载请注明来源:内存溢出
评论列表(0条)