`

VB6-ListView的排序和点滴

阅读更多
在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

这段代码的用意比较明显,就是通过创建一个临时的列来保存经过格式化的数值,然后在临时列进行排序,就可以避免字符串比较带来的漏洞了,当然使用完成后要干掉那个临时列了。

在使用中需要进行测试各种格式的排序效果,想使用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)支持插入代码的插入前执行,这个有点难弄

分享到:
评论

相关推荐

    MVC-ListView-DataModel-master.zip

    MVC-ListView-DataModel-master.zipMVC-ListView-DataModel-master.zipMVC-ListView-DataModel-master.zipMVC-ListView-DataModel-master.zipMVC-ListView-DataModel-master.zipMVC-ListView-DataModel-master....

    ListView排序,解决了数字排序

    1. 首先,我们需要在 ListView 控件的 ColumnClick 事件中设置排序列和排序顺序。 2. 然后,我们需要根据当前的排序列和排序顺序来确定是升序还是降序排序。 3. 接下来,我们需要创建一个 ListViewItemComparer 对象...

    drag-sort-listview

    在"drag-sort-listview-master"这个压缩包中,你应该能找到项目的源代码、示例应用、README文件以及如何集成和使用的详细说明。通过研究这些内容,你可以深入理解该库的工作原理,并根据项目需求进行定制。对于希望...

    VB6 ListView 排序

    在VB6(Visual Basic 6)中,ListView控件是一个常用组件,用于显示多项数据,类似于Windows资源管理器中的文件列表。它支持多种视图模式,包括报告、小图标、大图标和详细信息等。本篇文章将深入探讨如何在ListView...

    VB.NET ListView排序类

    一个用来排序ListView的类 以下需要在Listview的标题单击事件中加入 Private m_SortingColumn As ColumnHeader Private Sub ListView1_ColumnClick(ByVal sender As Object, ByVal e As System.Windows.Forms....

    VB6 ListView处理海量数据

    在提供的"Virtual_ListView_Demo"文件中,应该包含了如何使用虚拟模式处理海量数据的VB6示例代码,你可以通过学习和研究这个示例来掌握这一技术。通过合理利用ListView的虚拟模式,即使处理百万条数据,也能保证应用...

    安卓app开发项目-ListView上下翻页效果(源码).zip

    安卓app开发项目-ListView上下翻页效果(源码).zip安卓app开发项目-ListView上下翻页效果(源码).zip安卓app开发项目-ListView上下翻页效果(源码).zip安卓app开发项目-ListView上下翻页效果(源码).zip安卓app开发项目-...

    Android应用源码之drag-sort-listview-master.rar

    它主要由两部分组成:拖动(Drag)和排序(Sort)。拖动是指用户触摸并移动列表中的一个条目,而排序则是在拖动操作完成后,根据新的位置更新数据结构和视图。在源码中,这两个功能被封装在`DragSortController`类中,它...

    pinned-section-listview-master

    标题 "pinned-section-listview-master" 指的是一款仿照MIUI7文件管理器中“最近”功能的ListView实现,它特别强调了在ListView头部存在可以固定的分类。这个项目可能是一个开源Android开发示例,旨在帮助开发者创建...

    安卓app开发项目-ListView保持在列表的顶部固定View 案例分析 源码(源码).zip

    安卓app开发项目-ListView保持在列表的顶部固定View 案例分析 源码(源码).zip安卓app开发项目-ListView保持在列表的顶部固定View 案例分析 源码(源码).zip安卓app开发项目-ListView保持在列表的顶部固定View 案例...

    安卓listview相关相关-drag-sort-listview是一个支持拖拽排序和左右滑动删除功能的自定义ListView.rar

    然而,原生的ListView功能相对简单,不支持一些高级交互,如拖拽排序和滑动删除。本资源"drag-sort-listview"提供了一个自定义的ListView实现,旨在解决这些问题,为开发者带来更加丰富的用户交互体验。 这个自定义...

    21.[开源][安卓][拖拽]drag-sort-listview-master

    21.[开源][安卓][拖拽]drag-sort-listview-master DragSortListView(DSLV)是Android ListView的一个扩展,支持拖拽排序和左右滑动删除功能。重写了TouchInterceptor(TI)类来提供更加优美的拖拽动画效果。 DSLV...

    pinned-section-listview-1.0.0.jar

    pinned-section-listview-1.0.0.jar 已经用在项目中,方便给使用eplipse的朋友用。

    Android-react-native-timeline-listview.zip

    Android-react-native-timeline-listview.zip,React本机应用程序的时间线组件,安卓系统是谷歌在2008年设计和制造的。操作系统主要写在爪哇,C和C 的核心组件。它是在linux内核之上构建的,具有安全性优势。

    react-native-sortable-listview, ListView的拖放功能包装,用于响应本机.zip

    react-native-sortable-listview, ListView的拖放功能包装,用于响应本机 react-native-sortable-listviewListView的拖放功能包装,用于响应本机。 拖动时允许拖放自动滚动行。将它添加到你的项目中运行 npm install...

    VB6 ListView与ImageList实例

    在VB6(Visual Basic 6)中,ListView控件是一个常用且功能强大的组件,它允许开发者在用户界面上展示列表形式的数据,同时支持多种视图模式,如图标、列表、小图标和详细信息等。ImageList组件则为ListView提供图标...

    应用源码之drag-sort-listview-master.zip

    总之,"drag-sort-listview-master.zip"是一个深入研究Android自定义视图和ListView交互的好教材。通过学习和分析,开发者不仅可以掌握拖放排序的实现,还能提升自己在Android开发中的技巧和能力,为今后的项目开发...

    Listview 可自由调整行高 Vb6源码

    在VB6(Visual Basic 6)编程环境中,`ListView`控件是常用的一种显示列表数据的组件,它允许用户以多种视图模式查看数据,如图标、报告、小图标和详细信息。在某些应用场景中,可能需要根据需求自定义`ListView`...

    PyPI 官网下载 | django-split-listview-2020.7.1.tar.gz

    **PyPI 官网下载 | django-split-listview-2020.7.1.tar.gz** 这个资源是Python开发中的一个重要组件,源自Python的官方软件仓库PyPI(Python Package Index)。`django-split-listview-2020.7.1.tar.gz`是一个归档...

    TreeView-ListView右键菜单

    在IT领域,尤其是在Windows应用程序开发中,`TreeView`和`ListView`控件是常见的用户界面元素,用于展示层级结构的数据和列表数据。`TreeView`通常用于显示目录结构或树状关系,而`ListView`则常用于展示表格或者多...

Global site tag (gtag.js) - Google Analytics