vb 存换行文本数据到数据库

[my202com4]

如何把多行文本框的内容插入到数据库，我试过用普通的插入语句，只能插入一行，
比如插入一个家庭基本状况数据
父亲：某某某 干某某某工作
母亲：某某某 干某某某工作
......
......
但多行数据只能插入头一行
用的数据库是ACCESS

[lyserver]

可以直接插入多行啊。

[my202com4]

插入不了，我试过了

[lyserver]

我刚才用ACCESS创建了名为DB1.MDB的数据库，库里只有一个表temp，表里只有一个字段name，name为文本型，长度为默认的50，执行了下面语句：
Private Sub main()
Dim DB
Dim RS

Set DB = CreateObject("ADODB.Connection")

'打开数据库
DB.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\db1.mdb;"
'插入带换行的文本
DB.Execute "INSERT INTO temp VALUES('我爱你" & vbCrLf & "中国')"
'查询字段并输出
Set RS = DB.Execute("SELECT * FROM temp")
Debug.Print RS.Fields(0).Value '查询的结果是带有换行的。
RS.Close
Set RS = Nothing

DB.Close
Set DB = Nothing
End Sub
结果正常！

[my202com4]

谢谢，我再试试

[SYSSZ]

字段的长度设的太短了

[my202com4]

如果要是动态文本框如何产生& vbCrLf &的效果 比如一个文本框DB.Execute "INSERT INTO temp VALUES('"&text1.text&"')"

[my202com4]

用的是备注型字段

[my202com4]

可以,谢谢,就是显示的时候没有换行

[饮水需思源]

如果是text控件的话要将multiLine设置成True

[yu812]

学习了