个人重构机房收费系统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。 结果显示:
(编辑:李大同) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容! |