利用DataTable本身本身的个合并方法代码,VB.Net代码库,德仔网

代码语言
代码分类
【VB.Net】利用DataTable本身本身的个合并方法
作者:Dezai.CN / 发布于2011/8/7/ 1416
<div><span style="color: rgb(0,0,255)">Dim</span><span style="color: rgb(0,0,0)"> conn </span><span style="color: rgb(0,0,255)">As</span><span style="color: rgb(0,0,0)"> </span><span style="color: rgb(0,0,255)">New</span><span style="color: rgb(0,0,0)"> SqlConnection
 </span><span style="color: rgb(0,0,255)">Dim</span><span style="color: rgb(0,0,0)"> rs </span><span style="color: rgb(0,0,255)">As</span><span style="color: rgb(0,0,0)"> </span><span style="color: rgb(0,0,255)">New</span><span style="color: rgb(0,0,0)"> SqlDataAdapter
 </span><span style="color: rgb(0,0,255)">Dim</span><span style="color: rgb(0,0,0)"> ds </span><span style="color: rgb(0,0,255)">As</span><span style="color: rgb(0,0,0)"> </span><span style="color: rgb(0,0,255)">New</span><span style="color: rgb(0,0,0)"> DataSet

 </span><span style="color: rgb(0,0,255)">Private</span><span style="color: rgb(0,0,0)"> </span><span style="color: rgb(0,0,255)">Function</span><span style="color: rgb(0,0,0)"> connect_db() </span><span style="color: rgb(0,0,255)">As</span><span style="color: rgb(0,0,0)"> SqlConnection
 </span><span style="color: rgb(0,0,255)">Dim</span><span style="color: rgb(0,0,0)"> constr </span><span style="color: rgb(0,0,255)">As</span><span style="color: rgb(0,0,0)"> </span><span style="color: rgb(0,0,255)">String</span><span style="color: rgb(0,0,0)">
 constr </span><span style="color: rgb(0,0,0)">=</span><span style="color: rgb(0,0,0)"> </span><span style="color: rgb(128,0,0)">"</span><span style="color: rgb(128,0,0)">Server=PC-201105311336\SQLEXPRESS;uid=sa;pwd=123456;database=jiaxiaoai</span><span style="color: rgb(128,0,0)">"</span><span style="color: rgb(0,0,0)">
 </span><span style="color: rgb(0,128,0)">'</span><span style="color: rgb(0,128,0)">rs.Fill(dataset, "student")</span><span style="color: rgb(0,128,0)">
</span><span style="color: rgb(0,0,0)"> conn </span><span style="color: rgb(0,0,0)">=</span><span style="color: rgb(0,0,0)"> </span><span style="color: rgb(0,0,255)">New</span><span style="color: rgb(0,0,0)"> SqlConnection(constr)
 conn.Open()
 connect_db </span><span style="color: rgb(0,0,0)">=</span><span style="color: rgb(0,0,0)"> conn
 </span><span style="color: rgb(0,0,255)">End Function</span><span style="color: rgb(0,0,0)">



</span><span style="color: rgb(0,0,255)">Private</span><span style="color: rgb(0,0,0)"> </span><span style="color: rgb(0,0,255)">Sub</span><span style="color: rgb(0,0,0)"> 全部学生信息_Load(</span><span style="color: rgb(0,0,255)">ByVal</span><span style="color: rgb(0,0,0)"> sender </span><span style="color: rgb(0,0,255)">As</span><span style="color: rgb(0,0,0)"> System.Object, </span><span style="color: rgb(0,0,255)">ByVal</span><span style="color: rgb(0,0,0)"> e </span><span style="color: rgb(0,0,255)">As</span><span style="color: rgb(0,0,0)"> System.EventArgs) </span><span style="color: rgb(0,0,255)">Handles</span><span style="color: rgb(0,0,0)"> </span><span style="color: rgb(0,0,255)">MyBase</span><span style="color: rgb(0,0,0)">.Load
 </span><span style="color: rgb(0,0,255)">Dim</span><span style="color: rgb(0,0,0)"> sql </span><span style="color: rgb(0,0,255)">As</span><span style="color: rgb(0,0,0)"> </span><span style="color: rgb(0,0,255)">String</span><span style="color: rgb(0,0,0)">
 </span><span style="color: rgb(0,0,255)">Dim</span><span style="color: rgb(0,0,0)"> dt1 </span><span style="color: rgb(0,0,255)">As</span><span style="color: rgb(0,0,0)"> </span><span style="color: rgb(0,0,255)">New</span><span style="color: rgb(0,0,0)"> DataTable
 </span><span style="color: rgb(0,0,255)">Dim</span><span style="color: rgb(0,0,0)"> dt2 </span><span style="color: rgb(0,0,255)">As</span><span style="color: rgb(0,0,0)"> </span><span style="color: rgb(0,0,255)">New</span><span style="color: rgb(0,0,0)"> DataTable
 conn </span><span style="color: rgb(0,0,0)">=</span><span style="color: rgb(0,0,0)"> connect_db()
 sql </span><span style="color: rgb(0,0,0)">=</span><span style="color: rgb(0,0,0)"> </span><span style="color: rgb(128,0,0)">"</span><span style="color: rgb(128,0,0)">select * from student</span><span style="color: rgb(128,0,0)">"</span><span style="color: rgb(0,0,0)">
 rs </span><span style="color: rgb(0,0,0)">=</span><span style="color: rgb(0,0,0)"> </span><span style="color: rgb(0,0,255)">New</span><span style="color: rgb(0,0,0)"> SqlDataAdapter(sql, conn)
 rs.Fill(dt1) </span><span style="color: rgb(0,128,0)">'</span><span style="color: rgb(0,128,0)">填充表</span><span style="color: rgb(0,128,0)">
</span><span style="color: rgb(0,0,0)"> sql </span><span style="color: rgb(0,0,0)">=</span><span style="color: rgb(0,0,0)"> </span><span style="color: rgb(128,0,0)">"</span><span style="color: rgb(128,0,0)">select * from sysname</span><span style="color: rgb(128,0,0)">"</span><span style="color: rgb(0,0,0)">
 rs </span><span style="color: rgb(0,0,0)">=</span><span style="color: rgb(0,0,0)"> </span><span style="color: rgb(0,0,255)">New</span><span style="color: rgb(0,0,0)"> SqlDataAdapter(sql, conn)
 rs.Fill(dt2)
 dt1.Merge(dt2)
 DataGridView1.DataSource </span><span style="color: rgb(0,0,0)">=</span><span style="color: rgb(0,0,0)"> dt1 </span><span style="color: rgb(0,128,0)">'</span><span style="color: rgb(0,128,0)">将表中的数据显示到datagridView控件中，绑定数据</span><span style="color: rgb(0,128,0)">
</span><span style="color: rgb(0,0,0)"> </span><span style="color: rgb(0,0,255)">End Sub</span></div>
试试其它关键字
　DataTable　
同语言下
可能有用的
Dezai.CN贡献的其它代码(4037)