这个，看不太懂！

[yuhao1314]

<%Function Adjust_dapi(adj_str)
dim final_str,i
adj_str=Trim(adj_str)
final_str=""
If Len(adj_str)>0 then
for i=1 to Len(adj_str)
Select Case Mid(adj_str,i,1)
Case Chr(13):final_str=final_str & ""
Case Chr(10):final_str=final_str & ""
Case Else:final_str=final_str & Mid(adj_str,i,1)
End Select
Next
End if
Adjust_dapi=final_str
End Function%>
谁能帮忙点一点？

[若白师妹]

哪里看不懂?

[yuhao1314]

Function Adjust_dapi(adj_str)

[heroooooo]

Function Adjust_dapi(adj_str)
___________________________________
Adjust_dapi是调用的函数名称,adj_str是调用的参数.写完之后就可以这样调用:
Adjust_dapi xxx,其中xxx就是参数了..

[yuhao1314]

它的具体功能是什么

[heroooooo]

遍历,依次取字符串并且连接..

[yuhao1314]

好的，谢拉，可是今天我的可给分全部用完了，怎么办？怎么表示感谢？

[若白师妹]

请吃饭吧