请教，关于这段代码，有空格怎么办？
下面是将Excel数据导入到Access中这功能的部分代码：

Dim db As Database
Dim sheet As String
Dim accessPath As String
Dim accessTable As String
Dim sql As String
accessPath = App.Path & "\db.mdb"
accessTable = "student"
sheet = "Sheet1"
Set db = OpenDatabase(excelPath, True, False, "Excel 8.0;IMEX=1")
sql = ("Select * into [;database=" & accessPath & "]." & accessTable & " from [" & sheet & "$]")
db.Execute (sql)



问题是，如果Excel中的某个单元格的字符串首尾含空格的话（比如像“ abc”的首部就含有一个空格、“ecg ”的尾部也含有一个空格），那么导入到Aceess中也会一并将这些空格给导入了，有没有办法让导入之后的数据都去除了空格呢？

[解决办法]
你在使用Access的时候，将取出的数据用Trim函数去空格吧。
因为你的导入不是自己手工写的，是使用的自动的方法。
[解决办法]
有两个方法：
①在导入之后，从 Access 取数据时处理。
②在导入之前，先对 Excel文档 进行处理。

[解决办法]

探讨

引用:
你在使用Access的时候，将取出的数据用Trim函数去空格吧。
因为你的导入不是自己手工写的，是使用的自动的方法。

是在导入过程中处理（也就是在这段代码中再加代码）呢，还是在导入之后再处理呢

[解决办法]
可以在导入之后，对 Access 中的数据用 UPDATE 语句进行去除空格的更新。

[解决办法]
For n = 0 To rs.RecordCount
rs.Fields(0).Value = trim(rs.Fields(0).Value)
rs.Update
rs.movenext
next n