[VB.NET]插入数据到数据库问题!!

<script type="text/javascript"> </script> <script type="text/javascript" src="http://pagead2.googlesyndication.com/pagead/show_ads.js"> </script>
插入数据到数据库问题!!
空白处Name属性分别为_Text1_0到_Text1_4，现在想通过在空白处依次添入对应的值，点击录入把这些值添加到数据库中。如何在录入Button控件中写代码啊？？

通过sqlconnection和sqlDataAdapter连接了Form1.通过sqlDataAdapter生成了数据集Dataset21.

如图:
http://www1.freep.cn/photo1.php?url=url=photo5/0705101323254830.JPG
__________________________________________________________________________
datarow dr = dataset21.table[0].newrow();
dr[ "Name "] = this._text_1.text;
... ...
dr[ "xxx "] = this._text_4.text;
dataset21.table[0].add(dr);
sqlDataAdapter.Update(dataset21);
__________________________________________________________________________
顶ls，我改成VB的吧。

Dim dr As DataRow = DataSet21.Tables(0).NewRow
dr(0) = _Text1_0.Text
dr(1) = _Text1_1.Text
dr(2) = _Text1_2.Text
dr(3) = _Text1_3.Text
DataSet21.Tables(0).Rows.Add(dr)
Dim b As New SqlClient.SqlCommandBuilder(sqlDataAdapter)
sqlDataAdapter.Update(DataSet21)
sqlDataAdapter.Fill(DataSet21)
__________________________________________________________________________
2楼的可以实现插入，就是在空白处添入信息时，点击插入一下就插入一个信息，点击几次就插入几个一样的信息，可不可以同样的信息不管点几次都插入一个呢。就是不要插入重复的信息，，，还有就是点击插入时，显示的是先把数据库信息全部显示出来后面在添加了新插入的信息，可不可以只显示插入的信息呢？？ 就是只插入一条信息，不要显示全部数据库信息，只显示新插入的信息。。


先谢谢了 ！！！！！！！！！！！！！！！！！！
__________________________________________________________________________
如果有时间的话帮小弟再写下删除按纽中的代码。。
__________________________________________________________________________
不显示全部的 就显示最后一条记录就好了
插入的都是插入在最后一行的
__________________________________________________________________________
使用SQL语句吧。
__________________________________________________________________________
楼上诸位何必搞这么麻烦啊？ 一条SQL语句不就搞定了。
__________________________________________________________________________
请赐教
__________________________________________________________________________
为什么不用SQL语句？
__________________________________________________________________________
学习
__________________________________________________________________________
if not exists （select ……）
begin
insert into ……
end
__________________________________________________________________________
能解决问题的写个啊


都是些什么啊
__________________________________________________________________________
光说用sql语句 怎么写啊


给写上个吧
__________________________________________________________________________
Dim sql As String = "insert into disease(dis_name,dis_con)values( '' " + Me.TextBox1.Text.Trim() + " '', '' " + Me.RichTextBox1.Text.Trim() + " '') "
OleDbCmd6.Connection = OleDbCon6
OleDbCmd6.CommandText = sql
__________________________________________________________________________
if not exists （select * from 数据库表 where 地址=_Text1_0.text and 栋号=_Text1_1.text and 层数=_Text1_2.text and 每层房间数=_Text1_3.text )
begin
insert into 数据库表(地址,栋号,层数,每层房间数) values(_Text1_0.text,_Text1_1.text,_Text1_2.text,_Text1_3.text)
end
else
raiserror( ''数据库中已存在该记录！ '',16,1)


lz应该好好看看这方面的书，都是些基础的知识，不要指望给你完完整整的代码，那样你学不到东西的。
__________________________________________________________________________