VB6.0中怎样点击commend1按钮，便将一个文本框中的内容分别插入到access数据库中的两个字段里？

Question

例如 text1中的内容为 张三 25；access数据库中的表有姓名，年龄两个字段，怎样将张三加入到姓名；25加入到年龄，

Answer 1

dim a(0to1) as string
a=split(text1," ")

上面的代码可以实现让a(0)=张三，a(1)=25
有了a(0),a(1)插入到数据库即可

追问

是这样写吗？
Dim a() As String
a = Split(Text1.Text, " ")
insert into 123 values('a(0)''a(1)')

追答

我一般会这样：
Dim a() As String
a = Split(Text1.Text, " ")
with adodc1.recordset
.AddNew
.Fields(0) =a(0)
.Fields(1) = a(1)
.updata
end with

追问

VB里 可以根据文本框里的一个内容将收到的信息插入到不同的数据库里吗？例如 文本框里的内容是：1 张三 ，点击command，便将它插入到表名为1的access数据库，若文本框里的内容是：2 李四，便将其插入到表名为2的数据库

追答

当然可以，加判断就可以：
select case text
case "张三"
adodc1.recordset.AddNew
...
case “李四”
adodc2.recordset.AddNew
...
end select
其中adodc1\adodc2 绑定到不同的数据库

Answer 2

insert into可以'去百度下把