access查询中调用自定义函数的方法是什么

办公教程导读

收集整理了【access查询中调用自定义函数的方法是什么】办公软件教程,小编现在分享给大家,供广大互联网技能从业者学习和参考。文章包含741字,纯文字阅读大概需要2分钟

办公教程内容图文

在Access查询中是可以直接调用自定义函数的,这可以帮助我们解决实际工作中一些特殊的查询统计。

举例:

问:如何统计某些词语在歌词中出现在次数?

第一步:建表

具体的表见下图

第二步:编写自定义函数

具体的函数如下。这里有一个知识点,就是Split函数,这个以后我们再讲,这里先提一下。

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

[code=vb]

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

[/code]

第三步:建查询

具体的查询我们还是来看下面的截图

SQL语句:

SELECT 歌名, 歌词,分词, WordFrequency([歌词],[分词]) AS 词频 FROM 表2;

最后,我们来看一下运行结果

办公教程总结

以上是为您收集整理的【access查询中调用自定义函数的方法是什么】办公软件教程的全部内容,希望文章能够帮你了解办公软件教程access查询中调用自定义函数的方法是什么
如果觉得办公软件教程内容还不错,欢迎将网站推荐给好友。

hmoban主题是根据ripro二开的主题,极致后台体验,无插件,集成会员系统
自学咖网 » access查询中调用自定义函数的方法是什么