闲来广东麻将虚拟定位

今天在网上看到的，一大堆测试数据，懒得看了，把结论抄下来。

比如 
<% 
Dim a(10000),i,t 
t=Timer 
For i=0 to 10000 
a(i)=CStr(i) 
Next 
Response.Write Join(a,vbCrLf) 
Response.Write timer-t 
Erase a 
%> 
速度可以和php一拼（虽然还是没有他快)，另一种用法是 s=Join(Array("1","2","3",.....,"9999")) 
速度依然比"1" & "2" & "3" & .....& "9999"要快很多 

闲来广东麻将虚拟定位