运行环境  access2010  + win7 64位

原数据表字段名：

修改后的字段名：

If Col.Name = "x坐标" Then Obj.Columns("x坐标").Name = "X坐标" 

发现，原来不管你原来表中的字段是大写还是小写，在读取的时候一律是当做小写的

接着来：

If Col.Name = "x坐标" Then Obj.Columns("x坐标").Name = UCase("X坐标")

改不了，理论应该是可以的，但还是不成功

无意中把原来字段 “x坐标”  改成 “坐标x”，然后

If Col.Name = "坐标x" Then Obj.Columns("坐标x").Name = UCase("X坐标")

居然给修改了 

于是换个思路，直接先把“x坐标”和"y坐标"先改成汉字在前面的字段名  ，然后直接把两天语句加一起执行，OK!完美解决~~~~~

If Col.Name = "x坐标" Then Obj.Columns("x坐标").Name = "坐标x"
If Col.Name = "坐标x" Then Obj.Columns("坐标x").Name = UCase("X坐标")
If Col.Name = "y坐标" Then Obj.Columns("y坐标").Name = "坐标y"
If Col.Name = "坐标y" Then Obj.Columns("坐标y").Name = UCase("Y坐标")

具体不知道什么原因，为什么字母在前面就不管大小写默认的都是小写，放在后面就能修改了,希望大神解惑。。。