关于：ByValvalueの话题！

VBS ArrayList Class vbs中的数组类

• 淞南 发布于 2007-03-30 00:00
• 收藏 更新时间 数组 示例 作者 Add EndFunction Ubound ByValvalue

ClassArrayList Privateitems() Privatesize PrivateSubClass_Initialize size=0 ReDimitems(1) EndSub PrivateSubClass_Terminate items=null EndSub PublicFunctionAdd(ByValvalue) If(size=Ubound(items))ThenEnsureCapacity((size+1)) items(si..