Dim sConnectionString As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Application.StartupPath & "\binghe.xls" & ";Extended Properties=Excel 8.0;" '定义连接字符串
        Dim oleDbConnection As OleDbConnection = New OleDbConnection(sConnectionString)
        oleDbConnection.Open()

        '获取excel表
        Dim dataTable As DataTable = oleDbConnection.GetOleDbSchemaTable(OleDbSchemaGuid.Tables, Nothing)
        '利用SQL语句从Excel文件里获取数据

      

        Dim query As String = "SELECT * FROM [sheet1$]"
        Dim oleAdapter As OleDbDataAdapter = New OleDbDataAdapter(query, sConnectionString)

        oleAdapter.Fill(dt)
这是我的读取代码
问题是：如果EXCEL表中某列的值有数字和字母，只能读取到字母（开头）的值，不知是何缘故

想知道在读取EXCEL文件时，EXCEL表中的数据格式对读取到的内容有影响吗？
我把EXCEL表中的数据全部设置为文本格式也不行，数字开头的值读到的是空。

没有人遇到过这样的问题吗？自己顶

自己顶

没有测试7楼的代码，好像7楼只是加了一个宏。感觉应该不是宏的原因。
不过还是给分了

9楼的方法有门，我试试

excel作为数据源，感觉应该在读取的时候按照excel单元格中的类型读取。但是事实不是这样，无论excel单元格中的数据类型是什么样的，都无法正确完整的读取。同样是微软的产品，为什么会出现这样的问题呢？
也许是我们还学道不精啊。大家共同学习吧

对于用EXCEL做数据源，只需要在写入的时候为单元格赋值时加上"'"就行了，不需要在XLS文件中添加宏
目前没有发现比这更好的办法。期待更好的解决办法

经测试9楼提供的这个方法可行。谢谢