在datagrid中使用表间关系(连接ACCESS)

该博客介绍了如何在Windows Forms应用程序中利用.NET Framework与ACCESS数据库交互,创建表间关系。通过建立DataRelation,实现了在datagrid中展示ACCESS数据库中'部门暂'和'全体员工'表之间的连接,使得用户可以查看每个部门的人员信息。
摘要由CSDN通过智能技术生成

Imports System
Imports System.Data
Imports System.Drawing
Imports System.Data.OleDb

Public Class Form1
    Inherits System.Windows.Forms.Form
    Dim starpath As String = Application.StartupPath & "/renshi.mdb"
    Dim connstr As String = "Provider=Microsoft.Jet.OLEDB.4.0;"
    Dim connectstr As String = connstr & "Data Source=" & starpath
    Dim mycon As New OleDbConnection(connectstr)       
    Dim mydt As New OleDbDataAdapter("select * from 部门", mycon)
    Dim myset As New DataSet()   '声明实例化数据集myset
  

Sub rela()
        Dim pc As DataColumn
        Dim cc As DataColumn
        pc = myset.Tables("部门暂").Columns("部门编号")
        cc = myset.Tables("全体员工").Columns("所属部门")
        Dim rel As New DataRelation("查看本部门人员", pc, cc)
        myset.Relations.Add(rel)
    E

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值