在 vb中如何往数据库中实现添加记录

Sub 添加_OnClick(ByVal sender As Object, ByVal e As EventArgs)

Dim SqlConn As New SqlConnection

SqlConn.ConnectionString = "Persist Security Info=trueInitial Catalog=Datauid=sapwd=123456Data Source=."

SqlConn.Open()

Dim SqlCmd As New SqlCommand

SqlCmd.Connection = SqlConn

SqlCmd.CommandText = "Insert into #table (客户编号,性别,电话,电子信箱,地址,住址)values('" &客户编号.Text &"','" &性别.Text &"','" &电话.Text&"','" &电子信箱.Text &"'," &地址.Text &",'" &住址.Text &"')"

SqlCmd.ExecuteNonQuery()

SqlConn.Close()

End Sub

通过ADO技术对数据库进行 *** 作

例子如下(定义连接串与记录集和打开连接串忽略)：

rs1.open "select * from 课程 inner join 成绩 inner join 班级 inner join 学生 on (关系条件) where 1=2",conn,3,2,-1'用静态集悲观锁打开记录集，用空集来添加记录

然后通过逗rs("字段名称")=要赋予字段的值地来赋予相关的值，如果要添加多条，那么使用条件循环，直到循环结束，在循环体结束的地方加上逗rs.movenext地即可

1、Microsoft Access窗口中，选择文件菜单中的打开选项，打开一个已有的数据库。

2、数据库中有两张表格，如下图所示。

3、数据库中，表格学生信息是课程成绩的子表。

4、如果直接在子表中插入记录，会提示不能添加或修改。

5、其实，只需在主表中，插入相关的主键和记录。

6、接着，就可以在子表中插入相关记录了。

7、如果要在子表中插入字段，只需选择单击以添加选项。

8、新增字段后，输入字段名即可。

---