VB数据库添加字段

发布网友发布时间：2022-05-06 13:13

共3个回答

懂视网时间：2022-05-06 17:34

通用式： alter table [表名] add [字段名] 字段属性 default 缺省值 default 是可选参数实例： alter table 班级表2 add COLUMN 小组 int 0 以下例子可能确实column alter table [表名] add 字段名 smallint default 0 增加数字字段，整型，缺省值为0 alte

通用式： alter table [表名] add [字段名] 字段属性 default 缺省值 default 是可选参数

实例：

alter table 班级表2 add COLUMN 小组 int 0

以下例子可能确实column

alter table [表名] add 字段名 smallint default 0 增加数字字段，整型，缺省值为0

alter table [表名] add 字段名 int default 0 增加数字字段，长整型，缺省值为0

alter table [表名] add 字段名 single default 0 增加数字字段，单精度型，缺省值为0

alter table [表名] add 字段名 double default 0 增加数字字段，双精度型，缺省值为0

alter table [表名] add 字段名 Tinyint default 0 增加数字字段，字节型，缺省值为0

alter table [表名] add 字段名 text [null] 增加备注型字段，[null]可选参数

alter table [表名] add 字段名 memo [null] 增加备注型字段，[null]可选参数

alter table [表名] add 字段名 varchar（N） [null] 增加变长文本型字段大小为N（1～255）

alter table [表名] add 字段名 char [null] 增加定长文本型字段大小固定为255

alter table [表名] add 字段名 Datetime default 函数增加日期型字段，其中函数可以是 now（），date（）等，表示缺省值

（上面都是最常用的，还有其他的属性，可以参考下面的数据类型描述）

删除字段： alter table [表名] drop 字段名

修改变长文本型字段的大小：alter table [表名] alter 字段名 varchar（N）

删除表： drop table [表名]

创建表：

sql＝"CREATE TABLE [表名] （[字段1，并设置为主键] int IDENTITY （1， 1） NOT NULL CONSTRAINT PrimaryKey PRIMARY KEY，"&

　　"[字段2] varchar（50），"&

　　"[字段3] single default 0，"&

　　"[字段4] varchar（100） null，"&

　　"[字段5] smallint default 0，"&

　　"[字段6] int default 0，"&

　　"[字段7] date default date（），"&

　　"[字段8] int default 1）"

　　conn．execute sql

　　有null 的表示字段允许零长

热心网友时间：2022-05-06 14:42

Private Sub Command1_Click()
Dim TabExit As Boolean
TabExit = False
Dim cn As New ADODB.Connection
cn.CursorLocation = adUseClient
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\db1.mdb;Mode=ReadWrite;Persist Security Info=False;Jet OLEDB:Database Password=123456"
' cn.Execute "ALTER TABLE 库存表 ADD COLUMN 生产厂家 CHAR(20);"
' cn.Execute "ALTER TABLE 库存表 ADD COLUMN 生产日期 DATETIME;"
' cn.Execute "ALTER TABLE 库存表 ADD COLUMN 库存上限 Single;"
cn.Execute "ALTER TABLE 库存表 ADD COLUMN ID COUNTER;"
cn.Close
Set cn = Nothing
End Sub

热心网友时间：2022-05-06 16:00

1、增加字段：
CString msql = "ALTER TABLE student ADD COLUMN zian char(50)";
mdatabase.ExecuteSQL(msql);//添加名为zizhuan的字段到名为student的表中。
2、新纪录：
msqlstr = "INSERT INTO student (学号,姓名,数学) VALUES ('2011','jack','99')";
mdatabase.ExecuteSQL(msql);//添加学号为2011，姓名为jack，数学为99的一行记录到表student中。
3、删除：
CString msql = “DELETE FROM student WHERE 学号 = '2011'”;
mdatabase.ExecuteSQL(msql);//删除学号为2011的一行记录。