
在Access查询中是可以直接调用自定义函数的,这可以帮助我们解决实际工作中一些特殊的查询统计。
(相关推荐:access数据库学习)
举例:
问:如何统计某些词语在歌词中出现在次数?
第一步:建表
具体的表见下图
第二步:编写自定义函数
具体的函数如下。这里有一个知识点,就是Split函数,这个以后我们再讲,这里先提一下。
[code=vb]Public Function WordFrequency(ByVal Lyric As String, ByVal Word As String) As StringDim arr As VariantDim brr As VariantDim i As LongDim countChar As LongIf Lyric = “” Or Word = “” Then Exit FunctionIf InStrRev(Word, “|”) = 0 Then Exit Functionarr = Split(Word, “|”)For i = 0 To UBound(arr) - 1brr = Split(Lyric, arr(i))countChar = UBound(brr) - LBound(brr)WordFrequency = WordFrequency & ““” & arr(i) & “”” & “出现次数:” & countChar & vbCrLfNext iEnd Function[/code]
第三步:建查询
具体的查询我们还是来看下面的截图
SQL语句:
SELECT 歌名, 歌词,分词, WordFrequency([歌词],[分词]) AS 词频 FROM 表2;
最后,我们来看一下运行结果
以上就是access查询中调用自定义函数的方法是什么的知识。速戳>>知识兔学习精品课!