设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

分享 获取ACCESS安装路径的二法(分享)
tanhong 2008-10-9 18:31
我们VBA编程中,有时需要获取 Msaccess.exe 安装路径,如:用 shell方法启动带工作组mdb项目时,就必须指定 Msaccess.exe 的安装路径。下面介绍两种方法: 方法一:通过SysCmd函数 CODE: debug.print SysCmd(acSysCmdAccessDir) 方法二:通过注册表键值获取 CODE: Private ER_CrpShell As Object ' ...
个人分类: ACCESS作品|151 次阅读|0 个评论
分享 CBool函数妙用
tanhong 2008-9-25 19:57
实例演示按钮正常字体与斜体切换,通常方法用if语句,如用CBool函数就一句足以。见如下实例: 实例样本: CBool函数妙用.rar
个人分类: ACCESS作品|113 次阅读|0 个评论
分享 INI 文件操作函数全攻略(源码分享)
tanhong 2008-9-22 19:52
实例提供有二十二INI文件相关操作函数,并提供了函数功能说明,参数说明,及函数实例演示。是较为全面的INI的操作综合实例,现发上来与大家分享。 实例样本下载: INI操作函数全攻略.rar
个人分类: ACCESS作品|128 次阅读|0 个评论
分享 VBA修改ACCESS及EXCEL安全设置(源码)
tanhong 2008-9-14 00:30
用ACCESS和EXCEL分别做了一个修改ACCESS安全设置和EXCEL安全设置的实例。 ACCESS安全级别操作 EXCEL修改安全设置 注:本代码参考了部分脚本语言,现将两个实例都发于此。 1、演示VBA操作VBS脚本语言,你会发现这比用API操作注册表快捷; 2、通过上术方法修改ACCESS和EXCEL在注册表中安全键值。 实例样本: 代 ...
个人分类: ACCESS作品|137 次阅读|0 个评论
分享 字段实现关联锁定(分享)
tanhong 2008-9-5 22:42
有网友提出关于通过判断一个字段的值,来决定另一个字段是否锁定(充许编辑),记得以前也回过其他网友同样的问题。为此做了个实例发上来与大家分享。 实例样本: 字段关联锁定.rar
个人分类: ACCESS作品|89 次阅读|0 个评论
分享 引用类库操作演示实例源码
tanhong 2008-7-6 15:49
关于类库的引用(即:添加)与 移除操作自定义函数实例源代码 实例下载: 类库操作实例演示.rar
个人分类: ACCESS作品|101 次阅读|0 个评论
分享 (分享)联合查询实例解析
tanhong 2008-7-3 16:31
  在论坛之前的发帖中,已就联合查询定义、基本概念以及如何利用查询设计器进行联合查询设计,做过详细介绍。在此不再重复,本文着重就联合查询的实际运用,结合实例分步进行解析,让大家对于联合查询本身,及联合查询的实际运用,有一个初步直观而感性认识。   联合查询在数据库中运用是较广泛的,较为典型有:物品管 ...
个人分类: ACCESS作品|186 次阅读|0 个评论
分享 (原创) 获得指定数据库中对象演示源码
tanhong 2008-6-29 23:09
1、在前面我发过一个获取当前数据库对象的演示实例,而这个实例是获取任意指定数据库对象。 2、对象包括:表、查询、窗体、报表、宏、模块 实例样本: 获取另一个数据库对象.rar
个人分类: ACCESS作品|100 次阅读|0 个评论
分享 用查询设计器进行联合查询设计
tanhong 2008-6-29 10:57
一、联合查询的定义及相关基本概念 “联合查询”也有称为“联集查询”,联合查询是通过UNION运算符将两个或多个表、查询结 ...
个人分类: ACCESS作品|126 次阅读|0 个评论
分享 检测当前数据库指定表是否存在
tanhong 2008-6-19 20:01
因有网友提问关于这方面的问题,所以本人写了两个检测表是否存在的一个自定义函数,注明未测试,仅供参考 '********************************* '自定义函数一 '********************************* Public Function Btbl (strTblName As String) As Boolean Dim I As Integer Dim tdf As TableDef Btbl=False '遍历所 ...
个人分类: ACCESS作品|72 次阅读|0 个评论

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

GMT+8, 2024-5-15 13:12 , Processed in 0.121058 second(s), 13 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

返回顶部