为变量

Question

我需要将名为digitscounter的变量赋值为零。例如，如果我输入399，那么我想将digitscounter指定为000。如果我输入4568，那么0000。我只是想知道如何分配digitscounter变量，以便它可以保持零。

如何声明digitscounter变量？稍后，我需要在命令format(i, "digitscounter")中使用digitscounter。我已经尝试了以下内容：

Dim digitscounter As String
digitscounter = "000"        'for 3 digits ofcourse

不幸的是，错误运行时错误91出来了。我需要你的专业知识。对不起，我对VBA很新，所以忍受我啊。

Answer 1

听起来你正确地做到了。如果您将4568键入变量（例如i），那么您可以执行此操作：

Dim digitscounter As String
digitscounter = String(Len(i), "0")

Debug.Print Format$(i, digitscounter)    ' => "4568"

当然，如果i是数字数据类型，它将删除任何前导零，以便您的digitscounter字符串不会考虑它们。您需要将该数字读入String。