算法函数_API_系统
227
2020-12-19
access创建闪烁的通知窗体
为了突出信息的重要性,我们希望信息能高亮显示,甚至一直闪烁让更多的人注意消息通知。
可以通过计时器的时间间隔设置不同的闪烁颜色,以毫秒为单位使标签控件闪烁。
设置1秒钟改变一下颜色,颜色通过rnd函数随机生成新的RGB颜色
' 计时...
349
2020-12-06
access利用批处理bat进行备份文件
很多用过access的人都知道,access有个非常不好的毛病,就是容易崩溃。然后数据库损坏
我们可以做的就是常常备份,避免数据丢失带来巨大的影响
一般备份我们可以直接复制文件,按指定的要求在指定文件夹创建备份文件。
这里我们用dos批处...
290
2020-11-14
vba获取userform窗体的句柄
在 Visual Basic中可以通过HWnd属性获取UserForms 的句柄,HWnd属性提供对窗体的窗口句柄的访问。
在使用与窗口相关的Windows API时,需要窗口句柄。 但是和 Visual Ba...
283
2020-10-14
Access实现 Asin Acos函数(自定义函数)
Excel自带 Asin Acos函数,但Access没有,可以自己用VBA来实现 一个
Access实现 Asin Acos函数(自定义函数)
Const PI As Double = 3.1415926535...
568
2020-09-02
vba函数用RGB取颜色的反色
不同的颜色给我们不同的感觉。所以生活中有不同的颜色选择,比如衣物,生活用品等
而颜色有它的反色,又叫补色。比如有黑就有白,红对应青。
下面函数用RGB取颜色的反色 对比色
Public Function GetRevColor...
1296
2020-04-23
VBA读写文本文件,打开文件标识符号句柄 建议使用Freefile
VBA读写文本文件,一般使用下面的方法,即打开文件标识符号句柄 建议使用Freefile
dim i as Integer
i=FreeFile
Open FileName For Input As #i
Open FileName...
884
2020-04-22
VBA或VB 使用 DrawText API 在窗体上绘制文本
Article: Q154517
Product(s): Microsoft Visual Basic for Windows
Version(s): WINDOWS:4.0
Operating System(s):
Keywo...
1228
2020-04-16
Access vba自定义求标准差函数MyStdevp(同样适用于Excel VBA, VB6)
Access自带了DStdevp 聚合函数求标准差,但只能对表中字段求标准差,无法对提供的多个数字参数求标准差
所以自己做了一个求标准差的自定义函数,同样适用于Access VBA, Excel VBA, VB6
'MyStdevp 求标...
1560
2020-04-15
Access VBA自定义求平均值函数MyAvg (适用于Excel VBA, VB6)
Access自带了DAvg聚合函数求平均值,但只能对表中字段求平均值,无法对提供的多个数字参数求平均值
所以自己做了一个求平均值的自定义函数,同样适用于Access VBA, Excel VBA, VB6
'MyAvg 求平均值
Pub...
708
2020-04-11
Access VBA自定义函数stdevp
STDEVP 是用来计算标准差的函数,STDEV是样本标准差的函数,STDEVP是总体标准差的函数。
在Sql语句中 access可使用 STDEVP标准差的函数
但在VBA代码中,如果对一组数字求标准差,则没有一个自定义的函数,...
905
2020-04-02
access excel vba获取数组中的众数
在数据查询中,我们有时需要找出一组数据中出现次数最多的数字。这个也是我们常说的众数了。
如在数组{2,3,2,5,8,2,16,17} ,众数即是 2了
这个我们如果用SQL语句,是很容易求出来的。用count 统计,用order by 排...
742
2020-02-26
Access Excel VBA通过API修改硬盘卷标(Disk Label)
Access Excel VBA通过API修改硬盘卷标(Disk Label) 俗称硬盘标签 或硬盘别名--Change the Drive Volume Label
调用了: Windows 系统 A...
944
2020-01-19
从数据表中获取部门的函数
Public Function GetDeptCodeLen(Optional rintLv As Integer = 0) As Integer
Dim strTmp As String
&nbs...
1484
2019-12-22
Access SQL和代码实现连续及不连续Rank排名
在Excel中我们可以使用Rank函数对数据进行排名操作。
而Access是没有Rank函数的,所以不能直接用此函数排名操作。
下面介绍使用VBA代码和建立SQL查询来完成排序操作。
一、排名的种类跟算法
1、非连续排名
逻辑算法...
1503
2019-10-26
access获取列表的最小值
access不能像Excel一样,用Min()和Max()函数直接选择任意列表中的最小/最大值。
access一般都是在一列数据中找出最值。不能跨字段获取
下面函数,可以直接找出多个值(包括货币和日期)的最小值,如果列表中没有数值,则它们返...
文章分类
联系我们
联系人: | 王先生 |
---|---|
电话: | 13928102596 |
Email: | 18449932@qq.com |
QQ: | 18449932 |
微信: | 13928102596 |
微博: | officecn01 |