28,406
社区成员
发帖
与我相关
我的任务
分享
Dim a
a = ",,12,3,4"
While InStr(a, ",,") <> 0
a = Replace(a, ",,", ",")
Wend
function place(str)
str = replace(str,",,",",")
if instr(str,",,") > 0 then
str = place(str)
end if
place = str
end function
a = ",,,,1,2,5 "
response.write place(a)
<%
'...
dim a,b,c,i
a=trim(rs.fields("某字段").value)
for i=1 to len(a)
b=mid(a,i,1)
if b<>"," then
exit for
end if
next
c =mid(a,(i-1),(len(a)-i+1))
response.write "字符串本身是:" & a
response.write "处理结果是:" & c
'...
%>
var a=[,,,,,1,2,3];
var b=a.join("")
alert(b.length);
alert(b)
是说什么意思呢?