vbscript+asp把一位数字或两位数字转换成这样1 '01' 13 '13',该如何解决

vbscript+asp把一位数字或两位数字转换成这样1 '01' 13 '13'
参数:一个整数
我的参数只会输入一位数,或者两位数
经过转换后变成字符串,限制转换后的字符串为两位
比如:
1     '01 '
2     '02 '
13   '13 '
有没有什么函数


------解决方案--------------------
dim textlen,textvalue
textlen = len(textvalue)
select case textlen
case "1 "
textvalue = right( "0 ",变量,2)
case else
textvalue = 变量
end select