2014年4月3日

VBA ArrayList类 还可以继续扩展

摘要: Option ExplicitPrivate m_elements() As VariantPrivate m_size As LongPrivate m_capacity As LongPrivate m_dic As DictionaryPrivate Sub Class_Initialize() ReDim m_elements(9) m_size = 0 m_capacity = 10 Set m_dic = New DictionaryEnd SubPublic Property Get Capacity() As Long 'all capacity in... 阅读全文

posted @ 2014-04-03 20:59 鱼东鱼 阅读(2604) 评论(0) 推荐(0) 编辑

导航