VBA数据库解决方案第二十一讲:在已有的数据表中删除添加修改字段

《VBA数据库解决方案》教程（版权10090845）是我推出的第二套教程，目前已经是第二版修订了。这套教程定位于中级，是学完字典后的另一个专题讲解。数据库是数据处理的利器，教程中详细介绍了利用ADO连接ACCDB和EXCEL的方法和实例操作，教程第一版的修订内容主要是完成所有程序文件的32位和64位OFFICE系统测试。

这套教程共两册，八十四讲，今后一段时间会给大家陆续推出修订后的教程内容。今日的内容是：VBA数据库解决方案第二十一讲:在已有的数据表中删除、添加、修改字段

【分享成果，随喜正能量】190 我们能在生时多做善事，则临死何惧？我们能在平日贡献社会，则虽死犹生。每一个在你的生命里出现的人，都有原因，喜欢你的人给了你温暖和勇气，你喜欢的人让你学会了爱和自持，你不喜欢的人教会你宽容与尊重，不喜欢你的人让你自省与成长。。

第二十一讲 在已有的数据表中删除、添加、修改字段

大家好,今日继续给大家讲解VBA数据库解决方案的第21讲,如何利用VBA代码在已有的数据表中删除，添加，修改字段。这个内容是操作数据库的一项必修的内容，还望大家在实际工作中多利用，这节的知识点，对于读者提高自己的数据库的操作水平很有帮助。这节的内容同时也涉及到很多的SQL语句操作，对于大家理解通过VBA对数据库的控制会有提高，或许有的朋友刚刚看到我的平台的文章，对于代码的熟悉程度不如老朋友，还望能充分结合我之前的书籍《VBA代码解决方案》多实践，提高自己对VBA的理解能力，不然对于大段的代码的理解将是非常吃力的。

1 应用场景的具体分析

实例内容：我们还是利用数据来说话：如下的数据库的数据表“信息参考”共有两个的字段

现在要增加一个“电子邮箱”的字段，先设计这个字段的长度为10个字符，然后再修改一下到50个字符，当然在增加“电子邮箱”的字段前要先判断原数据表中是否存在这个字段，如果存在要先删除这个字段，同时在操作的过程中要做到可视化的控制。

分析：这个实例并不难，但过程是较繁琐的，我们在写程序前要先理清思路。下面先看看要实现这个要求大概要经过的过程：

1） 数据库和数据表连接的创建和打开。

2） 显示字段（可视化的要求），同时要判断是否有“电子邮箱”字段.

3） 如果有“电子邮箱”，那么删除，同时显示一下删除后的结果（可视化）.

4） 删除后，或者原数据表中没有这个字段，那么建立“电子邮箱”字段，这时建立的是字符长度是10.

5） 显示建立后的结果（可视化）.

6） 修改字段长度。

7） 最后再次显示结果（可视化）。

上述过程紧扣可视化的要求进行，一步一步的完成，我们在做程序的时候，也要做到这种可视化的要求，要给用户一个友好的操作，不能呆板的写代码，只是考虑到程序的运行时间，要尽可能的多为用户考虑，操作到哪一步了，要提示给用户，特别是在数据处理这类单调的工作过程中，更要这样。

<待续>

本讲内容参考程序文件：VBA与数据库操作（第一册）.xlsm

我20多年的VBA实践经验，全部浓缩在下面的各个教程中：