加入收藏 | 设为首页 | 会员中心 | 我要投稿 李大同 (https://www.lidatong.com.cn/)- 科技、建站、经验、云计算、5G、大数据,站长网!
当前位置: 首页 > 百科 > 正文

个人重构机房收费系统DataGridView显示用户信息

发布时间:2020-12-17 08:10:16 所属栏目:百科 来源:网络整理
导读:在做机房收费系统的过程中,删除用户需要将数据库的表显示到 程序的窗体中,我使用的控件是 Data GridView 先说说我编写程序的思路把。 ①、将数据库 T_User Info 表中某些特定的字段信息读取出来 ②、将读取出来的数据添加到 Data GridView 中 PS :需要注

在做机房收费系统的过程中,删除用户需要将数据库的表显示到程序的窗体中,我使用的控件是DataGridView

先说说我编写程序的思路把。

①、将数据库T_UserInfo表中某些特定的字段信息读取出来

②、将读取出来的数据添加到DataGridView

PS:需要注意的是数据库中字段的名称不是你DataGridView想要显示的。比如:数据库表中的一个字段名称为:username,而我DataGridView要显示的正好却是中文意思:用户姓名。

下面是我的具体操作以及表和窗体的图。

数据库表T_UserInfo 表:


DAL层数据:其中D层的方法返回值类型为 DataTable。

    '验证 查看 用户的信息
    Public Function Querydeleteuser(user As Entity.LoginEntity) As DataTable Implements IDAL.IEditUser.Querydeleteuser
        '数据库连接字符串
        Dim str As String = "Data Source=192.168.24.76;Initial Catalog=Charge_System;uid=sa;Pwd=123456"
        Dim conn As New SqlConnection(str)
        conn.Open()
        '查看视图中 的数据 
        Dim sql As String = " select UserID  as 用户名,UserName as 姓名,Head as 开户人  from T_UserInfo where Level= '" & user.level & "'"



        '分别创建  DataAdapter 对象  DataSet 对象  和 DataTable 对象
        '初始化myAdapter
        Dim myAdapter As New SqlDataAdapter(sql,conn)
        Dim mySet As New DataSet
        Dim myTable As New DataTable

        '将查询结果表 标题定位“用户信息”,并将用户信息表传给 datatable 
        myAdapter.Fill(mySet,"用户信息")
        myTable = mySet.Tables("用户信息")
        '关闭数据库
        conn.Close()
        '返回 datatable 表
        Return myTable
    End Function

接下来只需要将DataTable传给UI 层使用就行。

UI层:

DataGridView.DataSource=myTable

myTable为DLL 层返回的DataTable。

结果显示:

(编辑:李大同)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!

    推荐文章
      热点阅读