獲取編譯錯誤：參數類型不匹配錯誤

Question

Option Explicit

Sub data()

Dim a, b As String

a = "demo"
b = "text"    

Call getValue(a, b)

End Sub


Sub getValue(a As String, b As String)    

Cells(1, 1).Value = a
Cells(1, 2).Value = b

End Sub

---

我收到編譯時錯誤：上面的代碼上的byref參數類型不匹配錯誤

Answer 1

當定義Dim a, b As String ， 僅意味着b As String而a As Variant 。 您需要為定義的每個變量顯式定義類型。

將行修改為：將Dim a As String, b As String設為Dim a As String, b As String設為Dim a As String, b As String ，它將起作用。