Question

vb如何实现数据的多行复制

vb如何实现数据的多行复制， 通过datagrid 或者 MSHFlexGrid控件，实现选中控件中的多行数字并复制进剪贴板。其实单行的复制功能已经可以通过这两个控件实现了，但是多行（多列）数据一起复制到剪贴板的功能找不到实现的方法！！急啊，完全解决问题的可以追加分数！！！
要实现的功能应该是类似于excel似地，能够比较方便地，对选定的多行（多列）数据，按照原格式复制粘贴！！！有没有大神能够指导一下呢！！！
附，datagrid实现多行选择已经被我解决的，现在就差能复制到剪贴板的功能

Answer 1

MSHFlexGrid控件在多行选中时，最先选的行是Row属性，最后选的行是RowSel属性

如 mGrid 为MSHFlexGrid控件，选中4至7行时
mGrid.Row 的值为4，mGrid.RowSel 的值为7

如果是从下到上选，如选中 8至5行时
mGrid.Row 的值为8，mGrid.RowSel 的值为5

然后你用一个循环把这几行的数字复制到剪贴板就行了

Answer 2

Private Sub Command1_Click()

Dim i As Long, j As Long, s As String

s = ""
For i = 1 To ListView1.ColumnHeaders.Count
s = s + ListView1.ColumnHeaders.Item(i).Text + vbTab
Next i
s = s + vbCrLf
For i = 1 To ListView1.ListItems.Count - 1
s = s + CStr(i) + vbTab
For j = 1 To ListView1.ColumnHeaders.Count - 1
s = s + ListView1.ListItems.Item(i).SubItems(j) + vbTab
Next j
s = s + vbCrLf
Next i
Clipboard.Clear
Clipboard.SetText s

End Sub

这个是listview的多行复制到剪贴板，你可以参考一下