复制某表的部分字段到新表 vb vb.net
来源:百度知道 编辑:UC知道 时间:2024/07/08 09:33:25
说实话你这个题目不是很明确
让我有点不明白你想要的代码是什么
那么我的理解就是
你现在有两个表,表1,表2
你选中表1的某行,然后把选中的这行添加到表2去
如果是这样的话那么做法就是
运行环境 VB2008(.NET)
假设窗体名称为Form1,你添加六个控件出来
表格控件DataGridView1,DataGridView2
按扭控件四个Button1,Button2,Button3,Button4
然后清空窗体里所有代码使用我的代码就行了
Imports System.Data.OleDb
Public Class Form1
Public LeafFileName As String = CurDir() & "\Access.mdb" '这里是数据库文件路径和名称,你自己改
Public LeafFormName As String = "projects" '这里是你要读取这个数据库内的表的名称
Public LeafPassWord As String = "leafsoftpassword" '这里是数据库密码,如果没有密码就随便
Public LeafData1 As DataTable
Public LeafData2 As DataTable
Public LeafNewRow As DataRow '本次值得一提的是前两次给你的代码里都有这行,实际上这行在前两次里是没有用的,这行是添加行时需要的一个行的类,我忘记删除掉这个了而已,恰好在这次需要使用了,让你能更好地理解
Dim LeafOleDbConnection As OleDbConnection
Dim LeafOleDbCommand As OleDbCommand
Dim LeafOleDbDataAdapter As OleDbDataAdapter<