Visual Basic中定义的错误

Question

当我使用这个const语句时，我的编码工作正常。

Const strFullName As String = "C:\Sample\Haha.txt"

在我更改了Search.text（文本框名称）之后，它继续发出错误。

Const strFullName As String = "C:\Sample\" & Search.Text & ".txt"

编译错误：

需要常量表达

然后我尝试创建一个textbox1.text = Searchbox.Text。 textbox1显示C：\ Sample \ Haha.txt

请帮助，谢谢〜

Answer 1

Search.Text不是常量值 - 它是一个运行时属性，其值在运行时才知道，因此无法将其赋值给常量。您可以将strFullName定义为变量而不是常量：

Dim strFullName As String

...
' Set strFullName at run-time
strFullName = "C:\Sample\" & Search.Text & ".txt"

如果Search是一个文本框，您可能还想检查它是否有有效输入，以确保您没有尝试形成无效的文件名;例如，您可以使用Len(Search.Text)来确定文本框中文本的长度。