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

前端之家收集整理的这篇文章主要介绍了个人重构机房收费系统DataGridView显示用户信息前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。

在做机房收费系统的过程中,删除用户需要将数据库的表显示程序的窗体中,我使用的控件是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。

结果显示

原文链接:https://www.f2er.com/vb/258684.html

猜你在找的VB相关文章