【问题标题】: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() 函数,但我真的不想添加不必要的额外步骤。如果归结为这是唯一的选择,我会这样做,但我希望有人先解释一下这个问题。

【问题讨论】:

    标签: sql vba excel adodb


    【解决方案1】:

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

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

    【讨论】:

      猜你喜欢
      • 1970-01-01
      • 1970-01-01
      • 2015-06-04
      • 2015-10-02
      • 1970-01-01
      • 1970-01-01
      • 1970-01-01
      • 1970-01-01
      • 2011-11-20
      相关资源
      最近更新 更多