【Access示例】歌词中词语出现的次数-will.miao
Access软件网QQ交流学习群(群号码198465573),欢迎您的加入!
首页 >技术文章> Access数据库-窗体/数据页


【Access示例】歌词中词语出现的次数

发表时间:2019/6/28 9:08:29 评论(0) 浏览(3264)  评论 | 加入收藏 | 复制
   
摘 要:词语在歌词中出现的次数
正 文:

主要代码:

Public Function WordFrequency(ByVal Lyric As String, ByVal Word As String) As String
    Dim arr As Variant
    Dim brr As Variant
    Dim i As Long
    Dim countChar As Long
    
    If Lyric = "" or Word = "" Then Exit Function
    If InStrRev(Word, "|") = 0 Then Exit Function
    arr = Split(Word, "|")
    For i = 0 To UBound(arr) - 1
        brr = Split(Lyric, arr(i))
        countChar = UBound(brr) - LBound(brr)
        WordFrequency = WordFrequency & "“" & arr(i) & "”" & "出现次数:" & countChar & vbCrLf
    Next i

End Function


示例演示:

点击图片查看大图


附件下载:

点击下载此附件


Access软件网交流QQ群(群号:198465573)
 
 相关文章
校验密码限制出错次数  【咱家是猫  2007/11/24】
[示例]新增记录时复制上一条记录的示例\具有记忆功能的示例、默认上...  【竹笛  2008/9/8】
另类限制次数与注册实例(mdb)  【江羽  2009/9/3】
[示例]求特定字符出现在字符串中的次数  【钱玉炜  2009/12/29】
【access示例】用查询统计重复项出现的次数\统计重复数  【缪炜  2012/9/25】
【Access源码示例】用查询统计符合条件的重复数出现的次数,计数...  【麥田  2013/7/24】
【Access示例】统计某个字符串在某个表某个字段中出现的次数  【缪炜  2016/2/5】
常见问答
技术分类
相关资源
文章搜索
关于作者

will.miao

文章分类

文章存档

友情链接