假设你的listview的名称为listview1,变量为a(3)
创新互联专业为企业提供攸县网站建设、攸县做网站、攸县网站设计、攸县网站制作等企业网站建设、网页设计与制作、攸县企业网站模板建站服务，十余年攸县做网站经验，不只是建网站，更提供有价值的思路和整体网络服务。
代码为
for i=1 to listview1.ListItems.count
k=0
if listview1.ListItems(i).Checked=True then
k=k+1
a(k)=listview1.ListItems(i).SubItems(1)
end f
next
把ListBox的SelectionMode 属性设置为MultiExtended就可以了
如果是代码控制就是
ListBox1.SelectionMode=SelectionMode.MultiExtended
首先，在datagridview的CurrentCellDirtyStateChanged事件中判断下是不是点击的第一列复选框列，如果是，就立即将修改复选框状态提交，然后再判断，
如果是选中的，刚将当前行的，指定单元格的value值赋值给需要的文本框！不明白。。。。+ 企鹅
Private Sub DataGridView1_CurrentCellDirtyStateChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles DataGridView1.CurrentCellDirtyStateChanged
If DataGridView1.CurrentCell.ValueType Is GetType(Boolean) Then
DataGridView1.CommitEdit(DataGridViewDataErrorContexts.Commit)
End If
If DataGridView1.CurrentCell.ColumnIndex = 0 And DataGridView1.CurrentRow.Cells(0).FormattedValue.ToString() = "True" Then
TextBox1.Text = DataGridView1.CurrentRow.Cells(3).Value.ToString()
End If
End Sub
841526269
点击“开始”-“Excel选项”，在“基本设置”选项卡中勾选右侧的“在功能区上显示‘开发工具’”，使其显示出来。
切换到“开发工具”功能区，点击插入”下拉列表框，在弹出的列表中选择“复选框（ActiveX控件）”。
然后在文档区域拖动以绘制一个复选框。 并在该复选框上右键单击，在弹出的菜单中选择“属性”以打开“属性对话框”。
在打开的“属性对话框”中将“Caption”设置为空，”BackStyle“设置为透明，边框效果设置为0类型，完成后关闭”属性对话框“。