用VBA修改\增加字段的数据类型(逻辑型)问题

george

如何用VBA代码更改表中字段的数据类型或加字段


使用ALTER COLUMN改变一个当前字段的数据类型，需要指定字段名、新数据类型、还可以 (对文本和二进制字段)指定长度。


改字段


alter table 你的表名 alter column 你的字段名 数据类型


例如，下列语句把雇员表中一个字段的数据类型, 被称为ZipCode（最初被定义为整数），改变成一个10字符文本字段：


CurrentDb.Execute "ALTER TABLE 地址 ALTER COLUMN sz TEXT(22)"


改为逻辑型：


CurrentDb.Execute "ALTER TABLE 地址 ALTER COLUMN sz BIT"


日期时间：


CurrentDb.Execute "ALTER TABLE 地址 ALTER COLUMN sz

1. date

复制代码

"


备注型：


CurrentDb.Execute "ALTER TABLE 地址 ALTER COLUMN sz

1. memo

复制代码

"


货币：
money 8 个字节 介于 – 922,337,203,685,477.5808 到 922,337,203,685,477.5807 之间的符号整数。


real 4 个字节 单精度浮点数，负数范围是从 –3.402823e38 到 –1.401298e-45，正数从1.401298e-45 到 3.402823e38，和 0。


float 8 个字节 双精度浮点数，负数范围是从 –1.79769313486232e308 到 –4.94065645841247e-324，正数从 4.94065645841247e-324 到 1.79769313486232e308，和 0。


smallint 2 个字节 介于 –32,768 到 32,767 的短整型数。
integer 4 个字节 介于 –2,147,483,648 到 2,147,483,647 的长整型数。


decimal 17 个字节 容纳从 1028 - 1到 - 1028 - 1. 的值的精确的数字数据类型。你可以定义精度 (1 - 28) 和 符号 (0 - 定义精度)。缺省精度和符号分别是18和0





加字段


CurrentDb.Execute "Alter Table 地址 Add Column 字段三 Char(2)"


CurrentDb.Execute "Alter Table 地址 Add Column 字段1 BIT"


执行后结果(逻辑型时):


增加逻辑型字段后,该字段的查询属性中的显示控件属性为文本框,如何用VBA该为复选框呢?

george

问题解决:在access911中找到了答案[em07]



http://www.access911.net/fixhtm/72FAB31E14DCEAF3.htm?tt=如何用%20ADO%20设定表的某个字段的属性的“查阅”选卡中的“显示控件”属性？《表》