填充有记录集值的单元格中添加的空格

Posted 2023-03-24

【中文标题】填充有记录集值的单元格中添加的空格

【英文标题】：Spaces Added in Cells Filled with Recordset Value

【发布时间】：2015-09-10 15:24:39

【问题描述】：

我有一个用 SQL DB 中的数据填充单元格的子例程。这是我遇到问题的代码示例：

For varTempInt = 1 To varHdrRow - 2
    Cells(varTempInt + 1, 2).Value = varRecordset.Fields(varTempInt - 1).Value
Next

代码的问题在于它偶尔用记录集字段值填充单元格开头有一个空格。我不确定为什么会发生这种情况，而且它恰好非常麻烦。

我对即时窗口进行了故障排除，发现这个问题更加奇怪。通过在运行返回额外空间的特定 counter 的代码后直接停止，我得到以下结果：

?varRecordset.Fields(varTempInt - 1).Value
1517
?Cells(varTempInt + 1, 2).Value
 1517 

为了解释，我刚刚从中提取的记录集字段的值有没有空格，但它所在的单元格的值包含一个空格开始。

为什么会发生这种情况，我该如何预防？

编辑 1：是的，我知道我可以使用 Trim() 函数，但我真的不想添加不必要的额外步骤。如果归结为这是唯一的选择，我会这样做，但我希望有人先解释一下这个问题。

【参考方案1】：

显示不一致的原因是记录集字段值存储为String，而单元格值存储为Int。这与它在“立即”窗口中如此奇怪地出现的原因相同：前后的空格表示值是Int，而字符串则相同。

解决这个问题的方法是在比较之前对每个值进行CStr()。