Office中国论坛/Access中国论坛

标题: 自定义函数查询 [打印本页]

作者: roych 时间: 2010-12-16 10:25
标题: 自定义函数查询
不知道大家是否会使用一些自定义函数来查询呢？其实在这之前我也写过一个，只是当时有些东西没理解，用不了。现在根据一个网友要求，写了一个自定义函数来执行查询：
[attach]44391[/attach]
看附图知道，要求很简单，就是要根据成绩和组别来分组。——这个用Excel来处理简直太简单了，lookup函数或者使用一个数组公式基本就可以解决了，这里就不献丑了。有兴趣的朋友可以试试，不懂的话问问小妖姐姐。
先把自定义函数代码贴上来：

Function Level(Perf As Double, Grade As Double) As String
Select Case Grade
Case 1
If Perf >= 10 Then
Level = "C"
ElseIf Per >= 2 Then
Level = "B"
Else
Level = "A"
End If
Case 2
If Perf >= 15 Then
Level = "C"
ElseIf Per >= 12 Then
Level = "B"
Else
Level = "A"
End If
Case Else
Level = ""
End Select
End Function

复制代码

说明:
Level:最终显示结果
Perf:成绩
Grade:组别（也就是附图中的1、2组）。

作者: yyxtj 时间: 2010-12-16 10:38
你好，谢谢。

作者: yanwei82123300 时间: 2010-12-16 12:11
，谢谢。

作者: studypm 时间: 2010-12-17 00:32
谢谢

作者: khmkhm 时间: 2010-12-17 08:05
谢谢

作者: goto2008 时间: 2010-12-17 22:04
瞄瞄

作者: gm2wie 时间: 2010-12-19 12:28
谢谢分享，看看

作者: huangyz_xy 时间: 2010-12-19 16:26
例子很好，值得借鉴

作者: qxqjdy 时间: 2010-12-19 17:28
rwerwer

作者: xuwenning 时间: 2010-12-20 09:02
学习学习
瞧瞧

作者: hgxly 时间: 2010-12-23 09:09
谢谢

作者: miracle-y 时间: 2011-1-4 13:59
学习学习

作者: wjl936 时间: 2011-1-8 12:53
看看学习

作者: sd大海无量 时间: 2011-2-1 19:44
谢谢楼主！！！！

作者: 明镜 时间: 2011-2-5 15:21
看一下

作者: mzg7608 时间: 2011-2-23 11:56
谢谢

作者: 余方方 时间: 2011-2-28 17:40
谢谢分享

作者: 刘志文 时间: 2011-2-28 22:26
谢谢分享，学习学习!

作者: tsoyzm 时间: 2014-11-5 17:22
太想学这个了，谢谢

作者: c101 时间: 2014-11-6 08:43
谢谢

作者: sydney 时间: 2015-8-31 19:34
呵呵

作者: wzhl2008 时间: 2015-12-6 10:33
自定义函数查询

作者: pluto_snoopy 时间: 2016-3-14 17:06
好！

作者: ailiy 时间: 2016-3-15 16:26
完全看不懂啊，想学习，怎么办

作者: w17861464 时间: 2016-3-20 05:07
顶看看

作者: 做梦 时间: 2018-12-8 10:43
学习思路

作者: 六月雪 时间: 2018-12-8 23:04
哦哦哦哦哦哦噢噢噢噢哦哦哦哦哦哦哦哦哦

作者: lingjiang 时间: 2020-4-19 11:22
你好，谢谢

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)