VB.NET 中DataGridView显示数据库中的数据

柔光的暖阳◎ 2022-06-16 09:57 224阅读 0赞

这里给出一个将SQL Server2005数据库UserInfo表中的数据显示到DataGridView中的例子，来初识一下DataGridView的使用。

这个例子有很多缺点之处，敬请高人指点！

说一下这个例子的思路吧。

① **数据库Login中新建一个UserInfo表，并自己输入了几个用户信息，详情见下图：**

**表的设计**

![0_13256400647s0B.gif][]

**表中自己添加的用户信息，如图**：

![0_13256403806F8I.gif][]

②**在vs2010中，vb.net 窗体界面的设计**

**窗体添加的控件对象**

![0_1325641167jjyy.gif][]

**界面设计，如图**

![0_1325641289sK6s.gif][]

**  代码编辑：**

'引用命名空间
    Imports System.Data.SqlClient
    Imports System.Windows.Forms
    
    Public Class frmDataShow
    
        Private Sub btnOk_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnOk.Click
            '数据库连接
            Dim strConnection As String = "server=waly-pc;database=Login;uid=sa;pwd=123456;"
            Dim sqlConnection1 As New SqlConnection(strConnection)
    
            Dim dataAdapter As New SqlDataAdapter
            Dim dst As New DataSet
            Dim dt As New DataTable
    
            sqlConnection1.Open()   '打开数据库
    
            Dim sql As String = "select * from UserInfo"
            Dim cmd As SqlCommand = New SqlCommand(sql, sqlConnection1)
    
            dataAdapter.SelectCommand = cmd
            dataAdapter.Fill(dst, "info")
            dt = dst.Tables("info")
            sqlConnection1.Close()   '关闭数据库
    
    
            DataGridView1.AutoGenerateColumns = True '自动创建列
            DataGridView1.DataSource = dt
    
        End Sub
    
    End Class

③ **运行结果，如图**

![0_1325641485vmt3.gif][]

[0_13256400647s0B.gif]: /images/20220616/f4a2ae1e0e5f4a68b18bb25b114b56f6.png
[0_13256403806F8I.gif]: /images/20220616/af8eb72d3fa346ca86cd84f43a1c1ab8.png
[0_1325641167jjyy.gif]: /images/20220616/68a657f22aed485881f2fec3697a9b97.png
[0_1325641289sK6s.gif]: /images/20220616/e7b966b98eae406f861a554c6041edf6.png
[0_1325641485vmt3.gif]: /images/20220616/4f43cbd9cf65489ab2610da23b6a6c5e.png