Dim lvw As WinForm.ListView = e.Form.Controls("ListView1")
Dim spbm As String=e.Form.Controls("spbm")
Dim dt As DataTable
lvw.Rows.Clear() '清除原来的行
lvw.Images.Clear() '清除原来的图片
lvw.View = ViewMode.SmallIcon '用小图标模式
Dim cmd As new sql com mand
cmd.Conne ction Name="foxtable"
cmd.Com mandText="select * fr om {签字管理} where 签字编号='" & spbm & "'"
dt=cmd.ExecuteReader
Dim nms() As String = dt("审批时间") '定义标题为审批时间
Dim ics() As String = dt("签字地址")'定义图标键值,显示个人签字图片
For i As Integer = 0 To nms.Length - 1
lvw.Images.AddSmallImage(ics(i),ics(i) & ".ico") '添加代表这个国家的小图标
Dim r As WinForm.ListViewRow = lvw.Rows.Add() '增加一行
r.Text = nms(i) '指定标题
r.ImageKey = ics(i) '指定图标键值
Next
上述代码意思就是通过某一表单的编码在ListView中显示相应的签字图片和审核时间，运行有问题，麻烦您看一下代码哪个地方有问题。
加好友 
发短信
Post By：2017/6/12 10:09:00 [显示全部帖子]
