源码

热门下载

最新下载

联系方式

Access交流网(免费Access交流）

QQ：18449932 

网  址：www.access-cn.com

当前位置：首页 > 源码 > 模块/函数/VBA/API/系统 > 经典算法
经典算法

不规则的字符串中提取日期数据

  • 更新时间2015-02-02 14:37:50
  • 文件下载 点击下载
  • 文件类型rar
  • 文件版本access2003
  • 简要说明如何从不规则的字符串中提取需要的数据？比如表字段中有大量数据，字段数据是不规则的，那么如何才能从这数据中提取年月？

详细描述

如何从不规则的字符串中提取需要的数据？比如表字段中有大量数据，字段数据是不规则的，那么如何才能从这数据中提取年月？

如：有的显示的是ABCDE2010030015，有的则是ABED20100306123,就是英文字母不是统一位数日期数字也不统一,但是只需要取数字的前六位即可，前六位就是年月，如下图，

 

access数据库

 

解决方法：（用自定义函数方式）

 '使用方法:GetNumberPart([字段名称])

Function GetNumberPart(Expression As Variant) As Variant
    Dim lngI As Long
    
    GetNumberPart = Null
    
    For lngI = 1 To Len(Nz(Expression))
        If IsNumeric(Mid(Expression, lngI, 1)) Then
            GetNumberPart = Mid(Expression, lngI, 6)
            Exit For
        End If
    Next
End Function

 

 


标签:  access,提取数据,不规则,日期,mid
发布人:红尘如烟  
分享到：
点击次数：  更新时间：2015-02-02 14:37:50  【打印此页】  【关闭】
上一条：access记住上次输入的值  下一条：Access限制录入不同类型的数据

相关下载

热门下载

热门产品