Access VBA活用范例大辞典

Chapter 01 Access基础操作技巧 1
◎VBA编辑器 2
001 显示VBA编辑器 2
002 调用编辑工具栏 4
003 设置代码的显示效果 5
004 通过视图菜单打开窗口 6
005 设置强制性声明变量 7

◎过程、模块与语句 9
006 创建Sub过程 9
007 创建Function程序 10
008 定义有作用域的过程 13
009 创建标准模块和类模块 13
010 导入与导出模块 14
011 直接删除指定模块 15
012 快速定位到某个过程 16
013 拆分代码窗口 17
014 调用Sub过程 17
015 递归调用中的参数传递 19

◎内置函数 21
016 显示消息对话框（1） 21
017 显示消息对话框（2） 22
018 显示输入对话框 24
019 根据条件表达式的结果返回不同值 25
020 判断是否为空值 27
021 判断变量是否被初始化 29
022 取得字符串长度 30
023 使用RGB()函数设置颜色 32

◎VBA中的定义 33
024 VBA中的命名规则 33
025 让变量名更有意义 34
026 定义常量 34
027 定义变量 35
028 定义数组 35
029 定义动态数组 36
030 自定义数据类型 36
031 定义具有作用域的变量 38
032 定义静态变量 41
033 使用定义的常量 42
034 使用内置常量 44

◎流程语句 45
035 直线流程结构 45
036 简单条件分支结构 47
037 多条件分支结构（1） 48
038 多条件分支结构（2） 51
039 具有包含关系的条件分支结构 53
040 进行循环判断 55
041 进行判断循环（1） 57
042 进行判断循环（2） 59
043 进行计次循环 61
044 强制跳出循环 62

◎错误处理及工程安全 64
045 使用On Error GoTo处理错误 64
046 获取程序的具体错误信息（1） 66
047 获取程序的具体错误信息（2） 67
048 如何提示是否执行宏操作 69
049 创建数字证书 70
050 为数据库应用数字证书 71
051 保护VBA代码 71

Chapter 02 控件和对象的使用技巧 72
◎在窗体上操作控件 73
052 向窗体添加控件 73
053 第一次为控件添加代码 73
054 在代码中对窗体控件的引用 75
055 使用ME关键字快速引用当前窗体上的控件 76
056 快速获取表、查询、窗体或报表的名称列表 78
057 设置控件的可见性 80
058 指定控件是否可以接受焦点 83
059 指定一个控件能否被编辑 84
060 定位控件 86
061 设置控件大小 87
062 设置控件边框 91
063 指定控件是否透明 92
064 设置控件中的字体的属性 94
065 使标签具有闪烁效果 95
066 获得焦点及失去焦点时字段变更颜色 97

◎获取控件的数据 99
067 获取文本框中的数据 99
068 获取组合框中的数据 100
069 获取列表框中的数据 102
070 获取多列列表框某列中的数据（1） 103
071 获取多列列表框某列中的数据（2） 104
072 获取选项控件中的数据 106

◎数据库对象的引用 108
073 引用当前数据库 108
074 引用指定路径的数据库 110
075 引用数据库中的表 112
076 通过编写SQL来引用指定记录集 113
077 引用窗体或报表中的记录集 116
078 连接到当前数据库 118
079 获取已连接数据库指定表的记集 120

◎数据库对象的创建与编辑 122
080 创建数据库 122
081 创建数据表并新增字段 124
082 删除指定数据表 126
083 在数据表中删除指定字段 128
084 创建自动编号字段 129
085 创建与删除索引 131
086 在数据表中设置主键 134
087 创建与删除关系 136
088 创建与删除查询 140

Chapter 03 掌握Access中的对象操作技巧 143
◎应用程序的操作技巧 144
089 启动与退出Access 144
090 Access界面操作 145
091 打开指定对象 147
092 对象界面大小操作 148

◎窗体的操作 150
093 判断窗体是否已加载 150
094 设置窗体的标题 152
095 设置窗体的高度和宽度 153
096 导航按钮的显示和隐藏 155
097 记录选择器的显示和隐藏 156
098 设置窗体的数据源 158
099 设置窗体中控件的数据源（1） 160
100 设置窗体中控件的数据源（2） 161
101 窗体记录的双击事件 164
102 创建以及删除窗体 166
103 关闭所有打开的窗体 168
104 调整窗体的可编辑状态 170
105 引用窗体中的控件 172

Chapter 04 数据格式处理技巧 174
◎文本的外观格式 175
106 设置对象文本的前景颜色 175
107 设置对象中文本的字号 177
108 将文本加粗显示 180
109 将文本倾斜显示 181
110 为文本设置下划线 183
111 更改文本的字体 184
112 设置文本的对齐方式 186
113 设置文本的排列方式 187
114 控制文本框中的输入值 189

◎字符串数据处理 191
115 英文字母的大小写转换 191
116 将字符串换行显示 193
117 获取指定字符串的长度 194
118 从字符串的左侧截取字符 196
119 实现字符串的任意位置的字符截取 197
120 判断字符是否在另一个字符串中出现 199
121 快速对某个数据进行替换 201

◎数值数据处理 202
122 将数值转化为货币型 202
123 将数值四舍五入到整数 204
124 将数值四舍五入到指定位数 205
125 对数值进行取整 207
126 将数值转换为百分数 208
127 获取指定范围内的随机数 210
128 获取指定范围内的随机整数 211

◎日期数据处理 212
129 获取系统当前的时间 212
130 获取系统当前的日期 214
131 获取系统当前的日期和时间 215
132 将字符串日期转换为标准格式的日期 217
133 将日期格式化 218
134 获取日期的年月日 220
135 获取时间的时分秒 221
136 判断日期对应的星期 222
137 计算两个日期之间的时间间隔 224
138 计算经过X天数后的日期 226

Chapter 05 数据排序技巧序 228
◎通过窗体或报表对记录排序 229
139 对当前窗体中的数据记录进行排序 229
140 恢复窗体中的数据信息排序 230
141 在加载窗体时排序数据记录 232
142 在当前窗体中对数据进行多条件排序 234
143 打开其他窗体并进行多条件排序 235
144 加载报表时排序数据记录 237
145 获取文本框中设置的字段灵活排序 239
146 通过下拉列表选择排序条件排序 241
147 自定义多条件来排序数据 243
148 通过对话框设置排序关键字 244
149 在子窗体中排序数据 246
150 通过选项按钮指定排序依据 248

◎通过查询排序数据 250
151 将查询中的字段设置为排序依据（1） 250
152 将查询中的字段设置为排序依据（2） 252
153 恢复根据查询字段排序的顺序（1） 254
154 恢复根据查询字段排序的顺序（2） 257
155 在加载窗体时指定查询字段排序数据（1） 258
156 在加载窗体时指定查询字段排序数据（2） 261
157 通过下拉列表选择查询字段作为排序依据（1） 263
158 通过下拉列表选择查询字段作为排序依据（2） 265
159 指定多个查询字段对数据进行排序（1） 267
160 指定多个查询字段对数据进行排序（2） 269
161 通过下拉列表灵活指定多个查询字段排序数据（1） 272
162 通过下拉列表灵活指定多个查询字段排序数据（2） 274

◎通过编写SQL语句排序数据 276
163 在打开的窗体中显示排序结果 276
164 在打开的报表中显示排序结果 277
165 在窗体中手动指定排序依据 279
166 使用多个关键字排序 281
167 通过下拉列表指定多个关键字排序 283
168 自定义序列排序数据 284

Chapter 06 数据查询技巧 287
◎逐条查询技巧 288
169 跳转到下一条记录 288
170 跳转到第一条记录 289
171 跳转到最后一条记录 290
172 跳转到上一条记录 292
173 定位到指定记录 293
174 查询指定数据的记录 295
175 通过在文本框中输入数据来查询 296
176 继续搜寻满足条件的记录 298
177 通过在下拉列表框中选择选项来查询 299
178 查询以指定数据打头的记录 301
179 查询以指定数据结尾的记录 302
180 查询包含某个数据的记录 304
181 在子窗体中查询记录 305
182 实现继续查询操作 307
183 不使用通配符查询包含某个数据的记录 308
184 灵活设置查询字段查询记录 310
185 使用Like进行模糊查询 312
186 在立即窗口中显示查询结果（1） 314
187 在立即窗口中显示查询结果（2） 316
188 查询指定日期的数据记录（1） 317
189 查询指定日期的数据记录（2） 319
190 使用比较运算符来查询数据记录 321
191 查询指定日期范围内的数据记录 323
192 在指定的数值范围内查询数据 325
193 使用AND关键字如何查询数据 327
194 使用OR关键字如何查询数据 329
195 使用AND关键字和OR关键字如何实现多条件查询 331
196 处理多条件查询中没有指定条件的情况 333

◎同时显示所有查询记录技巧 335
197 快速筛选指定条件的所有数据记录 335
198 恢复筛选之前的效果 336
199 在加载窗体时筛选指定条件的所有记录 338
200 在文本框中自定义筛选条件筛选数据 339
201 模糊筛选包含指定字符的所有数据记录（1） 340
202 模糊筛选包含指定字符的所有数据记录（2） 342
203 打开报表时显示所有的筛选记录 344
204 打开报表时指定查询条件筛选符合的所有数据记录 345
205 在子窗体中筛选指定数据范围内的所有数据记录 347
206 将窗体中筛选的所有数据记录显示在报表中 348
207 查询指定截止日期之间数据记录（1） 350
208 查询指定截至日期之间数据记录（2） 352
209 查询指定日期范围内的所有数据记录（1） 354
210 查询指定日期范围内的所有数据记录（2） 356
211 显示指定的数值范围内的所有数据记录（1） 358
212 显示指定的数值范围内的所有数据记录（2） 360
213 使用AND关键字查询符合条件的所有记录 362
214 使用OR关键字查询符合条件的所有记录 364
215 使用AND关键字和OR关键字查询符合条件的所有记录 367
216 将筛选的所有数据按照指定顺序排序 369

◎通过编写SQL语句查询数据 371
217 在打开的窗体中显示所有查询记录 371
218 在下拉列表中设置筛选条件查询所有记录 373
219 在文本框中设置筛选条件查询所有记录 374
220 快速恢复筛选结果 376
221 使用Where语句实现多条件筛选 378
222 使用Where语句在打开的窗体显示查询结果 381

Chapter 07 数据记录的追加、删除和更新技巧 385
◎追加数据技巧 386
223 在数据表追加记录 386
224 判断新增记录是否已经成功 388
225 在追加记录时自动添加主键 390
226 确认是否需要追加记录 391
227 在非绑定窗体追加记录（1） 394
228 在非绑定窗体追加记录（2） 396

◎删改数据技巧 398
229 删除第一条数据记录 398
230 删除最后一条数据记录 400
231 删除指定位置的数据记录 402
232 逐条删除符合条件的记录 404
233 删除所有符合指定条件的记录 406
234 删除指定数值范围内的所有数据记录 409
235 删除指定日期范围内的所有数据记录 412
236 修改指定位置的数据 415

◎通过编写SQL语句编辑记录 417
237 使用SQL语句取得新增主键新增记录 417
238 使用Update语句更新数据（1） 420
239 使用Update语句更新数据（2） 422
240 在数据表中追加查询记录 424
241 在数据表中删除记录 425
242 在数据表中新增字段 427
243 在数据表中删除字段 428
244 在数据表中修改字段类型 430

Chapter 08 数据记录的统计和打印技巧 432
◎统计数据记录技巧 433
245 统计数据表中有多少条数据记录 433
246 统计符合指定条件的数据记录 434
247 统计符合多条件的数据记录 436
248 通过下拉列表设置统计条件 438
249 通过文本框设置统计条件 439

◎打印数据记录技巧 441
250 打开“打印”对话框 441
251 打印窗体当前的显示页 443
252 打印数据表中的数据 444
253 将报表内容打印成彩色 446
254 设置打印页面的大小 447
255 设置报表打印的页边距 449
256 在报表页脚设置打印页码 451
257 在报表页面打印水印效果 453
258 将指定数据圈释出来打印 455

Chapter 09 与Office之间的数据交换技巧 458
◎Access与Word之间的数据读写 459
259 通过Access创建空白Word文档（1） 459
260 通过Access创建空白Word文档（2） 461
261 通过Access创建空白Word文档（3） 462
262 创建基于模板的Word文档 464
263 打开指定的Word文档 466
264 通过TypeText方法向Word写入数据 468
265 在Word中插入表格 471
266 将Access的数据导入Word文档 473
267 通过文档属性将Access数据合并到Word 476
268 通过Word书签将Access数据合并到Word 479

◎Access与Excel之间的数据读写 482
269 使用通用方法启动Exce1应用程序 482
270 启动Excel应用程序并新建工作簿 484
271 打开已经存在的工作簿 485
272 激活指定工作表 487
273 向单元格输入数据 489
274 将Access的数据导入Excel表格 491
275 将窗体中的数据写入工作表编辑区 493
276 在工作表顶部插入空行 497
277 为数据表添加边框效果 498
278 对表格数据设置字体格式 501
279 设置工作表的列宽 503
280 获取单元格中的数据 505

Chapter 10 其他的操作技巧 507
◎文件的操作 208
281 从文本文件读取数据 508
282 将文本文件中的数据导入数据表中 509
283 将窗体中的数据保存至文本文档中 511
284 使用对话框选择文件 513
285 通过对话框打开文件 515
286 修改指定位置的文件的名称 517
287 复制指定位置的文件 520
288 删除指定位置的文件 522
289 新建文件夹 524

◎Web与XML的应用 256
290 启动邮件管理软件 526
291 通过邮件将数据库对象寄出去 527
292 将表或者查询导出为HTML 529
293 将HTML文件导入到Access数据库 531
294 将数据库中的对象导出为XML 533
295 将XML文件导入到Access数据库 535

◎超链接的应用 536
296 通过超链接打开指定的网页 536
297 显示超链接连接的位置 538
298 通过超链接打开本地文件 540

◎其他常用技巧 542
299 强制展开下拉列表 542
300 拖过代码创建新的窗体 543
301 组合框的联动 545
302 组合框的多级联动 547
303 获取外部数据表数据 553