ByRef 参数类型不匹配错误答案

【问题标题】：ByRef argument type mismatch errorByRef 参数类型不匹配错误
【发布时间】：2016-03-03 07:10:55
【问题描述】：

我想使用字符串变量调用名为 VBCopyFolder 的例程，但这样做时引用 strOldPath 时出现 “ByRef 参数类型不匹配” 错误。我有点不知道该怎么做。

VBCopyFolder 定义为：

VBCopyFolder(ByRef strSource As String, ByRef strTarget As String)

我要打的电话是：

Dim strOldPath, strNewPath As String
Call VBCopyFolder(strOldPath, strNewPath)

以下工作正常：

Call VBCopyFolder("U:\Database\Data.accdb", "Z:\Backups\Data.accdb")

如何正确格式化此调用？

【问题讨论】：

【解决方案1】：

在 VBA 中，

Dim strOldPath, strNewPath As String

等价于

Dim strOldPath As Variant, strNewPath As String

如果你希望这两个变量的类型都是String，你需要使用

Dim strOldPath As String, strNewPath As String

【讨论】：