Question

当我尝试使用字符串变量时，我遇到错误“需要常量”。

当我像MyString = "Test"这样强制初始化时，在此行出现了错误：

Const Test1= "DocRenew" & MyString & "docx"

我尝试使用Debug.Print MyString，但发现字符串MyString保持为空。

我在这里做错什么了吗？是否因为我要向Const中添加变量而遇到这个问题？

如果要检查与我相同的问题，请在完整代码下面

Sub Test()
    Dim MyString As String
    Dim TestVar As String
    Dim DocType1 As Boolean
    Dim DocType2 As Boolean

    DocType1 = True
    DocType2 = False

    MyString = "."

            If TestVar = "Monsieur" Then
                MyString = "Homme."
            End If



            If DocType1 = True Then

                    Const Test1 = "DocRenew" & MyString & "docx"
            End If

            If DocType2 = True Then

                    Const Test2 = "DocTest.docx"

        End If
End Sub

Answer 1

Const不能用变量构造。

  Dim Test1 as String
Test1 = "DocRenew" & MyString & "docx"

如何修复VBA中的“编译错误：必需常量”

1 个答案: