设为首页收藏本站 Access中国

开启辅助访问

官方QQ群

Office中国论坛/Access中国论坛 › Access中国门户旧版 › Access›模块类函数VBA

模块类函数VBA

和BINBOW＿Z一块进步之杂项篇（六）：Access打开帮助的办法: 文件下载; 2002-7-5 04:00

Access中文字符串转化为拼音通用的函数[原码下载]: 这个模块结合了拼音库表，谢谢赵鹏提供的拼音库表。 http://www.office-cn.net/vvb/uploadimages/20027116283389055.gif 文件下载WINRAR3.0压缩; 2002-7-2 00:40

[原创]Access自定义的计算一月有多少天的函数: 一天有多少天的函數。 Public Function my_daily(nowdate As Date) As Integer Dim my_date_first_day As Date '定義當前月的第一天 Dim my_date_last_day As Date'定義當下個月的第一天 Dim my_date_current_da ...; 2002-7-1 23:30

Access自动检测注册表，如果没有注册表信息，则自动增加: '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' ' 刷新表链接 ' ' ' ' 这个模块包含用于刷新到后台数据库表的链接的函数，如果那 ' ' 些表可用的话 ...; 2002-6-29 05:46

Access调用CHM的简单方法: 将HH.EXE文件COPY到数据库目录下，同时将帮助文件了COPY到数据库文件下然后写两句代码 Dim i As Variant i = Shell(CurrentProject.Path \hh.exe CurrentProject.Path \ipage.chm, 1); 2002-6-29 05:21

Access操作注册表信息的代码: 文件下载 RAR3.0压缩这段代码包括了注册表的基本所有操作。而且非常生动。; 2002-6-23 21:10

[分享]自动编号的实现: 看到许多网友都为自动编号所困绕，现在提供一份资料供大家参考,如下：更改递增 Autonumber 字段的起始值对于没有包含记录的新表，可以将 NewValues 属性设置为 Increment 的 Autonumber 字段的起始值的除 1 以 ...; 2002-6-21 04:32

Access判断中英文的方法技巧: 使用方法：chkGB(Access中国) 返回：英英英英英英简简 Private Function chkGb(strGB As String) As String On Error Resume Next Dim ByteGB() As Byte Dim ByteTemp(1) As Byte Dim leng As Long, idx As ...; 2002-6-17 04:46

Access实现同时输入多个条件的模糊查询源码: 在用ACCESS编程中,若你想同时查询多个条件,例如: 在一张数据表中, ----------------------- |地区|客户|销售额|数量| |---------------------| |上海|A|8000 |500 | |北京|B|6000 |600 | |江苏|C|5000 |300 | ...; 2002-6-14 22:10

Access自定义小数位数函数源码: 自定义小数位函数源码! Public Function n2(D As Double) As Double n2 = Int(D * 100 + 0.5) / 100 Exit Function '此函数可保留两位小数 End Function Public Function n3(D As Double) ...; 2002-6-14 21:51

Windows脚本组件与ACCESS[原作]: 用记事本新建文件，内容如下：SCRIPTLET Registration Description=ConvertTemp ProgID=ConvertTemp.Scriptlet Version=1.00 /Registration public property name=number get internalname=ge ...; 2002-6-12 04:18

使窗体居中显示代码: ACCESS中的窗体虽然设置了自动居中，但是打开后总是有点不居中的感觉，加下如下代码可以做到真正居中显示 Private Sub Form_Load() DoCmd.Echo False Dim x, y As Integer DoCmd.Maximize x = Me.WindowWidth ...; 2002-6-10 08:26

Access判断计算机有否光驱: 能不能判断我的电脑有否光驱，用ACCESS怎么做啊; 2002-5-22 04:46

Access取下个自动生成的 ID: 取得下个自动生成的 ID 在数据库里我们使用了自动增加的 ID，能取得下个自动产生的 ID With Data1.Recordset .AddNew MsgBox !ID'下个自动生成的 ID .CancelUpdate End With; 2002-5-3 16:52

和BINBOW＿Z一块进步之杂项篇（四）：查询条件的设计: USE：曾晓斌 PASSWORD为空功能简介：对日期、文本、数值型数据的查询条件表达式的写法，具有一点点的模糊查询功能难度等级：＊适应版本： ACCESS2000 说明：其中数据型的表达式要写全文件下载; 2002-4-28 07:46

1 234 5 6 7 8 9 10 ... 11 / 11 页下一页

相关分类

|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )

GMT+8, 2024-4-25 20:57 , Processed in 0.063120 second(s), 9 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

返回顶部