Question

vb在某个指定字段中增加内容

用ADODC1控件 已经连接好了相应的数据库 现在想要点击COMMAND1按钮后 TEXT1 内的字符串 添加到 （字段）PLC中去 请高手指教 我初学VB的菜鸟在此谢过了 请给出可以执行的代码
TEXT1 COMMAND1
C:\Documents and Settings\Administrator\桌面\毕业设计数据库 （数据库路径） 表名：登记表 字段；“PLC”
再次谢过~
1楼同学 我用的控件 谢谢 麻烦给个控件的 代码 通俗易懂 有注释最好 3Q
对了 能不能再有个 判定无重复增加的功能 万分感谢 我再提高分吧 大家辛苦了 在线等 麻烦写个可以执行的代码 3Q

Answer 1

private sub command1_click()
adodc1.ConnectionString="数据库连接"
adodc2.RecordSource="select * from 表名 where PLC='" & text1.text & "'"
adodc2..Refresh
if adodc2.recordcount > 0 then
msgbox"已经存在"
exit sub
end if
adodc1.RecordSource="SQL语句"
adodc1.Refresh
Adodc1.Recordset.AddNew
adodc1.recordset.Fields("PLC")=text1.text
adodc1.recordset.update
end sub

Answer 2

Dim conn As New ADODB.Connection
Dim rs1 As New ADODB.Recordset
conn.ConnectionString = "..." '连接省略了
conn.Open
rs1.Open "登记表", conn, adOpenStatic, adLockPessimistic
rs1.AddNew
rs1("PLC") = Text1.Text
rs1.Update

Answer 3

gfhxfhyxfhyxsfhcuhfcjgdjv