主题：复制粘贴数据很慢怎么解决

29637 24
29637 25
29637 26
29637 27
29637 28
29637 29
29637 30
29637 31

通过什么代码能够知道有多少行多少列呀，foxtable能够解决吗？

从表格中粘贴的数据到剪贴板，怎么知道剪贴板中存的数据是多少行多少列？

Dim s As String = ClipBoard.GetText()
Dim r1 As Row = CurrentTable.Rows(CurrentTable.TopPosition)
Dim nma() As String = s.Split("|")

For i As Integer = 0 To nma.Length - 1
    r1(i) = nma(i)
Next

使用上述代码去粘贴但是不知道单元格与单元格、行与行之间的分割是什么

使用上述代码去粘贴但是不知道单元格与单元格、行与行之间的分割符是什么

以下这段代码分列的问题解决了，分行的问题还没有解决，该怎么分行？

Dim s As String = ClipBoard.GetText()
Dim r1 As Row = CurrentTable.Rows(CurrentTable.TopPosition)
Dim nmas() As String = s.Split("w")
msgbox(nmas.Length-1)
For Each nma As String In nmas
msgbox(nma)
    Dim nmb() As String = nma.Split(" ")
    For i As Integer = 0 To nmb.Length - 1
        r1(i) = nmb(i)
    Next
Next

循环每一个字符，列出看结构

For Each s As String In ClipBoard.Gettext
    output.show(s & " " & asc(s))
Next

以上是我写的粘贴代码，实现不了粘贴表格的目的