@H_502_1@ 在做机房收费系统的过程中,删除用户需要将数据库的表显示到程序的窗体中,我使用的控件是DataGridView
@H_502_1@ 先说说我编写程序的思路把。
@H_502_1@ ①、将数据库T_UserInfo表中某些特定的字段信息读取出来
@H_502_1@ ②、将读取出来的数据添加到DataGridView中
@H_502_1@ PS:需要注意的是数据库中字段的名称不是你DataGridView想要显示的。比如:数据库表中的一个字段名称为:username,而我DataGridView要显示的正好却是中文意思:用户姓名。
@H_502_1@下面是我的具体操作以及表和窗体的图。
@H_502_1@
@H_502_1@DAL层数据:其中D层的方法返回值类型为 DataTable。
@H_502_1@
'验证 查看 用户的信息 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 层使用就行。
@H_502_1@UI层:
@H_502_1@DataGridView.DataSource=myTable
@H_502_1@myTable为DLL 层返回的DataTable。
@H_502_1@
原文链接:https://www.f2er.com/vb/258684.html