VB6 ADO Recordset字段名大小写敏感性随Windows语言设置变化问题

这是个典型的本地化兼容坑，我之前帮朋友排查过类似的VB6+Access在非英语系统下的字段访问异常，结合你的描述，给你几个实用的解决思路：

1. 替换感叹号（!）访问方式为括号索引 #

VB6里的rs!字段名是早绑定标识符访问，它依赖VB的解析引擎来识别字段名，而这个引擎会受系统区域设置的字符规则影响——匈牙利语的大小写转换规则和英语不同，刚好你的字段名里的nY组合触发了这个解析bug。

把所有类似rs!ROMRightMinY的代码改成晚绑定的括号访问：

' 替换前
Dim value As Double
value = rs!ROMRightMinY

' 替换后
value = rs("ROMRightMinY").Value

这种方式会直接让ADO按原始字符串匹配字段名，跳过VB的区域敏感解析，彻底避开大小写匹配问题。

2. 强制连接字符串使用英语区域规则 #

如果不想大面积修改代码，可以在Access的ADO连接字符串里添加Locale Identifier=1033参数（1033是英语-美国的区域ID），强制ADO用英语的字符规则处理字段名匹配：

Dim conn As ADODB.Connection
Set conn = New ADODB.Connection
' 注意添加Locale Identifier参数
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\YourDatabase.mdb;Locale Identifier=1033;"

这样不管系统是匈牙利语还是其他语言，ADO都会按英语的大小写规则解析字段名，不会出现nY组合的匹配异常。

3. 给字段名加上方括号（应急方案） #

如果只是临时修复个别字段，可以给感叹号后的字段名加上方括号，让VB解析器把整个字段名当成完整标识符：

value = rs![ROMRightMinY]

不过这个方案的可靠性不如前两个，因为VB的解析引擎还是可能受区域设置影响，仅作为临时过渡使用。

问题根源补充 #

匈牙利语的字符集里，Y和y的大小写映射规则和英语不同，VB6的早绑定解析引擎会按照系统区域的规则来处理标识符的大小写匹配，导致ROMRightMinY里的nY组合被错误解析，认为和数据库里的字段名大小写不匹配；而改成ROMRightMiYY后，字符组合避开了这个解析陷阱，所以恢复正常。

内容的提问来源于stack exchange，提问作者Rich Potash