string - Lpad with zero's in vbscript

Question

I'm trying to pad a string with 0's to the left.The length of the output string should be 7. Here's my code :

inputstr = "38"
in = string(7 - Len(inputStr),0) & inputStr
msgbox in

I'm getting error Expected Statement Please help me Thank You

Answer 1

The following code will run 5% faster:

inputStr = "38"
result = Right("0000000" & inputStr, 7)

msgbox result