- 浏览: 257567 次
文章分类
- 全部博客 (395)
- Tech (0)
- [随笔分类]心情 (95)
- [随笔分类]技术 (112)
- [随笔分类]管理心得 (13)
- [随笔分类]Code SOP (5)
- [随笔分类]望图知意 (11)
- [网站分类]1.首页原创精华.NET区(包含架构设计、设计模式)(对首页文章的要求:原创、高质量、经过认真思考并精心写作) (8)
- [随笔分类]重构代码 (1)
- [随笔分类]童童 (2)
- Program (1)
- [随笔分类]看你知道不知道 (1)
- [网站分类]4.其他技术区 (31)
- [网站分类]3.非技术区(技术之外的文章,但不要涉及任何政治内容) (21)
- [网站分类]9.求职招聘区(个人求职、企业招聘) (0)
- [随笔分类]昨日关注 (15)
- [网站分类]6.读书区(技术书籍阅读心得、书籍推荐) (3)
- [随笔分类]一步一个脚印 (2)
- [网站分类]网站管理区(网站管理方面的疑问、建议、意见, 寻求管理员帮助) (1)
- [网站分类]2..NET新手区(用于发表不合适发表在首页的.NET技术文章,包括小经验、小技巧) (3)
最新评论
在VB6 的ListView的排序是比较烦人的,因为它只是按照字符串进行排序,因此,数值的排序就惨不忍睹了,周六在陪老婆值班的时候,看到了一片文章,很爽,今天试验了一下,还好,代码如下:
Public Enum ListviewSortOrder
lsoAscending = 0
lsoDescending = 1
End Enum
Public Sub SortItem(lvwObject As ListView, ColumnHeader As MSComctlLib.ColumnHeader, SortOrder As ListviewSortOrder, Optional FormatString As String = "##########.##########")
Dim TempColumnHeader As ColumnHeader
Dim i As Integer
With lvwObject
Set TempColumnHeader = lvwObject.ColumnHeaders.Add(, "TempColumn")
For i = 1 To .ListItems.Count
If ColumnHeader.Index = 1 Then
.ListItems(i).SubItems(TempColumnHeader.Index - 1) = Format(.ListItems(i).Text, FormatString)
Else
.ListItems(i).SubItems(TempColumnHeader.Index - 1) = Format(.ListItems(i).SubItems(ColumnHeader.Index - 1), FormatString)
End If
Next
.Sorted = True
.SortOrder = SortOrder
.SortKey = TempColumnHeader.Index - 1
.Sorted = False
.ColumnHeaders.Remove "TempColumn"
End With
End Sub
lsoAscending = 0
lsoDescending = 1
End Enum
Public Sub SortItem(lvwObject As ListView, ColumnHeader As MSComctlLib.ColumnHeader, SortOrder As ListviewSortOrder, Optional FormatString As String = "##########.##########")
Dim TempColumnHeader As ColumnHeader
Dim i As Integer
With lvwObject
Set TempColumnHeader = lvwObject.ColumnHeaders.Add(, "TempColumn")
For i = 1 To .ListItems.Count
If ColumnHeader.Index = 1 Then
.ListItems(i).SubItems(TempColumnHeader.Index - 1) = Format(.ListItems(i).Text, FormatString)
Else
.ListItems(i).SubItems(TempColumnHeader.Index - 1) = Format(.ListItems(i).SubItems(ColumnHeader.Index - 1), FormatString)
End If
Next
.Sorted = True
.SortOrder = SortOrder
.SortKey = TempColumnHeader.Index - 1
.Sorted = False
.ColumnHeaders.Remove "TempColumn"
End With
End Sub
这段代码的用意比较明显,就是通过创建一个临时的列来保存经过格式化的数值,然后在临时列进行排序,就可以避免字符串比较带来的漏洞了,当然使用完成后要干掉那个临时列了。
在使用中需要进行测试各种格式的排序效果,想使用VBUnit或者ComUnit,但是刚刚使用,效果不是很好,还在弄,现在的关键不是使用,而是想了解,它是如何做的,慢慢来吧。
这几天还是比较关心如何在VB6实现AOP功能,其实还是觉得G#的语法比较优秀的,而且看起来也清楚多了。但是如何在VB里边嵌入新的语法格式呢,这些天一直困扰我,在经过试验后,觉得下边两种方法还是可以的:
(1)将新语言放到条件编译中,如下边代码
#If Aop then
.....
#End if
但是我认为如果将语法这样定义,还不如使用配置文件痛快,而且代码在注入后是明码的,不爽。
(2)采用一个比较变态的办法,就是在文件中任意嵌入新定义的语法,然后在编译的时候做手脚,就是在VB执行编译前将代码注入,当然这种注入的代码是符合VB语法的,然后在进行编译,当然这种手法也是换汤不换药,不过我还是比较喜欢这一种,当然需要对VB的IDE进行一些改造了,可能比较麻烦了。
通过对G#比较可以看到,在与VB6 Aop Add-Ins相比,功能要强大的多:
(1)继承的使用
(2)语法的灵活性
(3)支持正则表达式格式的多匹配
(4)支持插入代码的插入前执行,这个有点难弄
发表评论
-
启动NDuiker项目
2005-01-20 17:05 464今天是进驻博客园的第一天,在这里安家真的很不错,十分感谢DuD ... -
NDuiker项目第2天总结
2005-01-21 08:53 657昨天晚上基本上实现了 ... -
NDuiker项目第3天
2005-01-22 22:50 588今天是周六了,原本以为是很轻松的一天,结果只有到了这个时 ... -
NDuiker项目第6天
2005-01-25 16:50 596这几天好忙,也好累呀,这几天是公司项目收尾的阶段,忙的都透不过 ... -
对.Net 类库的一点思索
2005-02-02 09:29 617这些天主要在测试GDI+的 ... -
测试一个网站的想法
2005-02-05 17:07 547由于项目的需要,测试了一下“上海研发公共服务平台” 登录:ht ... -
项目建议书编写总结
2005-02-25 15:46 777昨天完成了项目建议书的编写工作,整个春节期间的工作到今天全部完 ... -
MyIE 增加了RSS功能
2005-02-28 09:54 576今天更新了MyIE,发现MyIE增加了RSS功能,试用了一下, ... -
www.beihua.edu.cn计划摘录
2005-02-28 14:11 786www.beihua.edu.cn工作计划 1:网站后期制作计 ... -
网站调研资料记录
2005-03-01 15:56 634资料整理备忘 1:内外网IP确认 ... -
静静的看书
2005-03-08 17:18 587这几天还是很忙,但是似乎好了很多,因为目前主要是写一个基于Sm ... -
我的Smart Client 的学习笔记
2005-03-09 15:35 1703User Interface Process (UIP) Ap ... -
研发、开发、运营
2005-03-25 12:15 637这些天很忙,网络也不争气,才刚刚好一点。 ... -
当需求变更来临
2005-04-30 14:26 546昨晚已经和老婆安排好5 ... -
重新登录Window2003的域
2005-05-12 09:58 690今天公司要求重新登录Windows2003的域,记录一下,以后 ... -
当不愿意写字得时候
2005-05-16 15:36 718做项目得前期分析得时候,我还是比较喜欢在本子上写写、画画得,通 ... -
远离技术的时候
2005-06-20 11:05 436这一个月一直在忙一个项目,现在项目的可研报告也 ... -
Asp.Net 中使用客户端Activex控件需要注意的事情
2005-08-13 12:57 958案例:Asp.Net +VB制作的Activex控件 操作系统 ... -
Office开发中的测试的与众不同之处
2005-08-22 14:29 736今天修改了一下自己以 ... -
大家确实都很忙
2005-08-27 08:20 738先谈几个技术问题: 1 ...
相关推荐
MVC-ListView-DataModel-master.zipMVC-ListView-DataModel-master.zipMVC-ListView-DataModel-master.zipMVC-ListView-DataModel-master.zipMVC-ListView-DataModel-master.zipMVC-ListView-DataModel-master....
1. 首先,我们需要在 ListView 控件的 ColumnClick 事件中设置排序列和排序顺序。 2. 然后,我们需要根据当前的排序列和排序顺序来确定是升序还是降序排序。 3. 接下来,我们需要创建一个 ListViewItemComparer 对象...
在"drag-sort-listview-master"这个压缩包中,你应该能找到项目的源代码、示例应用、README文件以及如何集成和使用的详细说明。通过研究这些内容,你可以深入理解该库的工作原理,并根据项目需求进行定制。对于希望...
在VB6(Visual Basic 6)中,ListView控件是一个常用组件,用于显示多项数据,类似于Windows资源管理器中的文件列表。它支持多种视图模式,包括报告、小图标、大图标和详细信息等。本篇文章将深入探讨如何在ListView...
一个用来排序ListView的类 以下需要在Listview的标题单击事件中加入 Private m_SortingColumn As ColumnHeader Private Sub ListView1_ColumnClick(ByVal sender As Object, ByVal e As System.Windows.Forms....
在提供的"Virtual_ListView_Demo"文件中,应该包含了如何使用虚拟模式处理海量数据的VB6示例代码,你可以通过学习和研究这个示例来掌握这一技术。通过合理利用ListView的虚拟模式,即使处理百万条数据,也能保证应用...
安卓app开发项目-ListView上下翻页效果(源码).zip安卓app开发项目-ListView上下翻页效果(源码).zip安卓app开发项目-ListView上下翻页效果(源码).zip安卓app开发项目-ListView上下翻页效果(源码).zip安卓app开发项目-...
它主要由两部分组成:拖动(Drag)和排序(Sort)。拖动是指用户触摸并移动列表中的一个条目,而排序则是在拖动操作完成后,根据新的位置更新数据结构和视图。在源码中,这两个功能被封装在`DragSortController`类中,它...
标题 "pinned-section-listview-master" 指的是一款仿照MIUI7文件管理器中“最近”功能的ListView实现,它特别强调了在ListView头部存在可以固定的分类。这个项目可能是一个开源Android开发示例,旨在帮助开发者创建...
安卓app开发项目-ListView保持在列表的顶部固定View 案例分析 源码(源码).zip安卓app开发项目-ListView保持在列表的顶部固定View 案例分析 源码(源码).zip安卓app开发项目-ListView保持在列表的顶部固定View 案例...
然而,原生的ListView功能相对简单,不支持一些高级交互,如拖拽排序和滑动删除。本资源"drag-sort-listview"提供了一个自定义的ListView实现,旨在解决这些问题,为开发者带来更加丰富的用户交互体验。 这个自定义...
21.[开源][安卓][拖拽]drag-sort-listview-master DragSortListView(DSLV)是Android ListView的一个扩展,支持拖拽排序和左右滑动删除功能。重写了TouchInterceptor(TI)类来提供更加优美的拖拽动画效果。 DSLV...
pinned-section-listview-1.0.0.jar 已经用在项目中,方便给使用eplipse的朋友用。
Android-react-native-timeline-listview.zip,React本机应用程序的时间线组件,安卓系统是谷歌在2008年设计和制造的。操作系统主要写在爪哇,C和C 的核心组件。它是在linux内核之上构建的,具有安全性优势。
react-native-sortable-listview, ListView的拖放功能包装,用于响应本机 react-native-sortable-listviewListView的拖放功能包装,用于响应本机。 拖动时允许拖放自动滚动行。将它添加到你的项目中运行 npm install...
在VB6(Visual Basic 6)中,ListView控件是一个常用且功能强大的组件,它允许开发者在用户界面上展示列表形式的数据,同时支持多种视图模式,如图标、列表、小图标和详细信息等。ImageList组件则为ListView提供图标...
总之,"drag-sort-listview-master.zip"是一个深入研究Android自定义视图和ListView交互的好教材。通过学习和分析,开发者不仅可以掌握拖放排序的实现,还能提升自己在Android开发中的技巧和能力,为今后的项目开发...
在VB6(Visual Basic 6)编程环境中,`ListView`控件是常用的一种显示列表数据的组件,它允许用户以多种视图模式查看数据,如图标、报告、小图标和详细信息。在某些应用场景中,可能需要根据需求自定义`ListView`...
**PyPI 官网下载 | django-split-listview-2020.7.1.tar.gz** 这个资源是Python开发中的一个重要组件,源自Python的官方软件仓库PyPI(Python Package Index)。`django-split-listview-2020.7.1.tar.gz`是一个归档...
在IT领域,尤其是在Windows应用程序开发中,`TreeView`和`ListView`控件是常见的用户界面元素,用于展示层级结构的数据和列表数据。`TreeView`通常用于显示目录结构或树状关系,而`ListView`则常用于展示表格或者多...