我是用MSFlexgid表格来显示数据的,在版面里面设置了一些简单的查询功能,但假如我将数据直接从excel中粘贴复制过来的话,当我查询的时候就找不到这些数据,请问是怎么回事啊?有没有解决办法?我自己认为是因为excel中数据的内码和普通的不同?因为假如我先双击excel表格,选取数据,然后在将数据复制到MSFlexgrid中,就不会出现查询不出来的问题。求救!

解决方案 »

  1.   

    代码就是很一般的那种,从文本筐到MSFlexgird的复制。。
     rsl.Edit
     writerecord i
     rsl.Update 
    Public Sub writerecord(r As Integer)
       Dim i As Integer
       
       MSFlexGrid1.Row = r
       For i = 0 To col_num - 1
         MSFlexGrid1.Col = i
         If MSFlexGrid1.Text = "" Then
            rsl.Fields(i) = Null
           Else
           rsl.Fields(i) = MSFlexGrid1.Text
         End If
       Next
    谢谢了先~