我们知道用“ ”号比用“+”号快。因为“+”要对字符窜变量做类型判断并转换。
　　当时也没想出什么好办法。只是将两次“”运算拆开，速度提了一倍。还是解决不了问题。
　　结果就是：for i 1 to 5000 ，i以字符形式相加。用运算，要300-500ms
　　现在试试下面这个。建了个CStrCat的类。
　　程序代码：
　　Class CStrCat ‘这是类开始。
　　Private i，sa
　　Public Property Get Value
　　Redim Preserve sa
　　Value=Join
　　End Property
　　Private Sub Class_Initialize
　　i=clng
　　Redim sa
　　End Sub
　　Private Sub Class_Terminate
　　Erase sa
　　End Sub
　　Public function Add
　　If len=0 Then Exit Function
　　If ) Then upsize
　　sa=ps
　　i=i+1
　　End function
　　Private Sub UpSize
　　Dim u
　　u=ubound
　　Redim Preserve sa)
　　End Sub
　　End Class
　　你可以用这个代码测试一下性能分别：
　　程序代码：
　　%
　　PageExeTime1=Timer * 1000 ‘计时开始
　　Set sc=new CStrCat
　　For i=0 To 5000
　　sc.add iaaaaaa
　　next
　　response.write sc.value
　　‘计时结束
　　Response.Write ，Processed time: fix*1000PageExeTime1))ms/font/p
　　PageExeTime2=Timer * 1000
　　For i= 0 To 5000
　　sc2=sc2iaaaaaa
　　Next
　　response.write sc2
　　‘计时结束
　　Response.Write ，Processed time: fix*1000PageExeTime2))ms/font/p %