asp vb 这段代码看不懂visit_count = string(length-l,"0") & visit_count

来源:百度知道 编辑:UC知道 时间:2024/06/04 01:34:23
所有代码是<%
Response.Write("您是第")
const length = 6
dim visit_count,i,num,l
visit_count = CStr(Application("count"))
l = len(visit_count)
if l < length then
visit_count = string(length-l,"0") & visit_count
l = length
end if
for i=1 to l
num = Mid(visit_count,i,1)
Response.Write "<img src=""../img/counter/"&num&".gif"">"
next
Response.Write("位来客")
%>
其中visit_count = string(length-l,"0") & visit_count中的string(length-l,"0") 不知道是什么语法,具体的意义是什么

string是vb的一个函数,string(count, a)表示把生成a重复count遍的一个字符串。
string(length-l, "0")表示把0重复length-1遍。
这儿length = 6,如果l是1的话,函数的结果是"00000"
&是字符串链接。l是visit_count转换成字符后的长度。
其实就是在visit_count前面添0,凑齐6位。