扫一扫
分享文章到微信
扫一扫
关注官方公众号
至顶头条
在本页阅读全文(共3页)
Class clsA/B Property Name1 as string ... End Property Property Name2 as string ... End Property ...... ...... ...... End Class |
Public Class clscolA/B Inherits System.Collections.CollectionBase Public Function GenerateAson() As clsA/clsB 'New并返回一个 clsA or clsB '初始化属性的工作可以在这里进行 End Function Public Sub AddSon(ByVal objSon As clsA/clsB) '增加一条新纪录 InnerList.Add(objSon) End Sub Public Sub Sort() '根据某设定的属性对集合进行排序 InnerList.Sort(New clsSortByName) End Sub '默认Item属性以及更多Method从略 End Class |
如果您非常迫切的想了解IT领域最新产品与技术信息,那么订阅至顶网技术邮件将是您的最佳途径之一。