在查询功能里面我们都遇到DataGridView控件，现在看看它是如何为我们服务的。

主要是通过代码来绑定数据库

一、添加控件

二、以查询充值记录为例

U层：

Private Sub btnQuery_Click(sender As Object,e As EventArgs) Handles btnQuery.Click

Dim i As String
        enRecharge.CardNo = Trim(txtCardNo.Text)
        i = FA.SelectRechargeInfo(enRecharge)
        Select Case i
            Case "存在充值记录"
                mylist = FA.GetMylist(enRecharge)
                DGV.AutoGenerateColumns = False       '不允许自动添加列
                'DGV.AutoGenerateColumns = True
                DGV.DataSource = mylist               '把泛型集合当做DataGridView的数据源
            Case "不存在充值记录"
                MessageBox.Show("不存在充值记录","提示信息",MessageBoxButtons.OK)
                Exit Sub
        End Select
    End Sub