关于列表框的多条记录同时插入到数据表中

Question

列表框中有多条记录,数目不定,要求同时插入到数据表的多个列中,请问这个语句怎么写?

Answer 1

就是说列表框中有多条内容,我要一次性把这些内容存到数据库表中
比如说List1中有a,b,c,d.....,我要一次性把这些内容插入到表中的一行里

Answer 2

Dim i%, strTemp As String, strSql As String
    
    For i = 0 To List1.ListCount - 1
        strTemp = strTemp & List1.List(i) & "','"
    Next
    strTemp = Left(strTemp, Len(strTemp) - 2)
    strSql = "update 表 values('" & strTemp

Answer 3

上面的写错了，应该是Insert Into
    Dim i%, strTemp As String, strSql As String
    
    For i = 0 To List1.ListCount - 1
        strTemp = strTemp & List1.List(i) & "','"
    Next
    strTemp = Left(strTemp, Len(strTemp) - 2)
    strSql = "insert into 表 values('" & strTemp

Answer 4

不知道你用的什么数据库，不同的数据库，插入多条数据的语句不同，给你一个MYSQL的例子吧：strSQL = "INSERT INTO TABLENAME (A, B, C) VALUES ('a', 'b', 'c'), ('aa', 'bb', 'cc'), ('aaa', 'bbb', 'ccc')"＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
免费的学习交流网站，欢迎大家访问！
http://www.j2soft.cn/

Answer 5

to fayshy2()
首先谢谢你的热心指教,随后给你加分,现在还有个问题,就是表A中不单是这几个字段,还有其它列,比如说除了List1,还有Text1,Text2的内容要同时插入,这样就要指定数据所要插入的列了,你认为列名加在那里好?其实你已经在以前帮我解决过很多问题了,真的很感激你,我是一个学生,现在正在做一个排课系统,和以前做的系统不同,里面的数据操作很复杂,经常问一个问题要等半天才有人回我,请问你能留个QQ给我吗,也算是我要拜师,我觉得你是个热心高手,能帮我解决很多问题,衷心希望你能收我这个徒弟,这里弟子有理了,哈哈

Answer 6

比如现在窗体控件和数据如下:
text1.text="111"
text2.text="222"
List1.text: a,b,c,...
text3.text="333"表A中的列名如下:
t1 :保存TEXT1的内容
t2: 保存TEXT2的内容
t3--t10:  7个列保存List1内容 (List1的内容条数<=7)
t11: 保存TEXT3的内容