Question

VB中文本框内容写入表的代码？如：文本框内容1，单击提交按钮，就可以把1写入SQL中表shuzi中的号码一栏。

只需要题目中需求的代码，别的乱码请别回答。

Answer 1

Private Sub Command1_Click()
Dim conn As New ADODB.Connection
Dim strSql As String

conn.ConnectionString = "填入你的数据库连接字符串"
conn.Open

strSql = "Insert shuzi(号码) values('" & Text1.Text & "')"
conn.Execute strSql
conn.close

end sub

实际使用的时候还在检测一下文本框中的值是否符合要求。做出错处理等。