复制某表的部分字段到新表 vb vb.net

来源：百度知道 编辑：UC知道 时间：2024/06/17 23:45:25
表1有五个字段m1，m2，m3，m4，m5(自动编号，主键)表2也有五个字段m1，m2，m3，m4，m5(自动编号，主键)，其中表2是有内容的，及有很多记录，，我想让按钮控制建表1的时候先设置五个字段，然后再把表2的m2，m4字段的内容复制到表1中，而m1，m3字段为空，怎么弄下？还有我想弄个电子词典，你给我点建议，，，比如英汉和汉英！但是我弄的是其它外语的，，谢谢

说实话你这个题目不是很明确
让我有点不明白你想要的代码是什么
那么我的理解就是
你现在有两个表,表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<