首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

请问怎么把文本框中的每一行导入到ACCESS中的每一行中去

2012-01-28 
请教如何把文本框中的每一行导入到ACCESS中的每一行中去这里有一个文本框Text1、一个按钮Command1、一个“db.

请教如何把文本框中的每一行导入到ACCESS中的每一行中去
这里有一个文本框Text1、一个按钮Command1、一个“db.mdb”数据库(里面有一个名叫“a”的表,表中有一个叫“b”的字段)

Text1中有很多行,每一行都只有一个单词

如何做到点击Command1,Text1中的每一行就导入到 b字段的每一行中去,谢谢

[解决办法]
先把text1 用split 分开,再遍历。
insert
dim str() as string

连接数据库 cn
str = split(text1,vbnewline)
for idx= 0 to ubound(str)
sql = “insert into a values (‘” & str(idx) & "')"
cn。execute sql
next
关闭数据库
[解决办法]

探讨
先把text1 用split 分开,再遍历。
insert
dim str() as string

连接数据库 cn
str = split(text1,vbnewline)
for idx= 0 to ubound(str)
sql = “insert into a values (‘” & str(idx) & "')"
cn。execute sql
next
关闭数据库

热点排行