MSFlexGrid，我单击某个Cell时，可复制这个Cell的内容？

Question

MSFlexGrid显示数据，我单击某个Cell时，可复制这个Cell的内容？怎么不能复制呀？
很急很急！
高手帮忙。。

Answer 1

不明白，你想怎么复制？你点击某个CELL时，可以得到该单元格的内容，然后你可以随便处理

Answer 2

非常简单，请把以下代码放至MSFlexGrid的Click事件中：
'如果是复所有选中的单元格内容
Clipboard.Cleaer
Clipboard.SetText Grid.clip,vbCFText'如果仅复制单独一单元格内容
Clipboard.Cleaer
Clipboard.SetText Grid.TextMatrix(Grid.row,Grid.col),vbCFText请结贴，谢谢！

Answer 3

确实grid.text即为当前单元格的内容.

Answer 4

'复制
Private Sub Command4_Click()
    With MSHFlexGrid1
        Clipboard.SetText .TextMatrix(.Row, .Col)
    End With
End Sub'粘贴!
Private Sub Command5_Click()
    With MSHFlexGrid1
        .TextMatrix(.Row, .Col) = Clipboard.GetText
    End With
End Sub

Answer 5

好！上个问题就当解决了，马上给分
===========另一个问题
同样MSFlexGridPrivate Sub grdvalues_Click()
Dim sql
MsgBox grdvalues.MouseRow '//单击的那行，我点第一行时，返回数字1
MsgBox CurrentPage.Text '//当前页为1
sql = "Select top " & grdvalues.MouseRow * CurrentPage.Text & " * From table "
MsgBox sql
End Sub怎么弹出的是 select top 16 * from table 阿？应该是 select top 1 * from table 才对阿(注： 16为每页显示的记录数 )这个问题解决另开贴给100分

Answer 6

从 zhujiechang(小朱) 的话得到启示结贴