如何在VB中用SQL语句动态的增加字段.

Posted 2023-03-27

在线等.请把详细的代码写出来.谢谢.
text1,text2,text3,跟这个有什么关系,还有INSERT INTO不是插入一条记录吗.

参考技术A sql = "Insert Into 表名("
If Text1.Text <> "" Then sql = sql & "字段1,"
If Text2.Text <> "" Then sql = sql & "字段2,"
If Text3.Text <> "" Then sql = sql & "字段3)"
sql = sql & ") Values("
If Text1.Text <> "" Then sql = sql & Text1.Text
If Text2.Text <> "" Then sql = sql & Text2.Text
If Text3.Text <> "" Then sql = sql & Text3.Text
sql = sql & ")"
这里，要求字段3为必填，例如使用时间

text是从窗体接收到数据后，才填加到对应的字段中，如果没有接收到某个字段信息的时候，就不添加相应的字段，
另：这是一条插入语句，但是，他也代表更新，删除的语句，其形式都是一样的，
不知道你希望得到那种语句的信息 参考技术B alter table add column本回答被提问者采纳

解决用 VB 中用 ADO 访问 数据库时 SQL 查询处理 Null 值的问题（ 使用 iff(isNull(字段), 为空时的值，不为空时的值) 来处理）

程序的环境是 VB6 + ADO + Access，在用 SQL 语句查询时，希望把两个字段合并成一个字段，但其中一个字段 Null 值直接导致两个字段合并后也变成了 Null 值。之前只能用 VB 中的 IsNull 分别处理两个字段的值，前段时间想尝试用 SQL 语句直接解决，确一直未能成功， 差点放弃之际找到了答案，总结如下：

目的：

实现 Select ( 字段1 +  字段2 ) As A

问题：

字段2 如果为空值 (Null)，则 不论字段1 的值是否为空，A 的值为空值 (Null)

解决：

1、在 Access 中，可使用 Nz(字段, 为空时的值) 来处理

2、在 VB6 + 数据库 中，则使用 iff(isNull(字段), 为空时的值，不为空时的值) 来处理