VB.NET重构(一)——DataGridView的使用

来源:互联网 发布:淘宝优惠券采集 编辑:程序博客网 时间:2024/06/05 18:21

       在查询功能里面我们都遇到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
三、最后界面

       

        


0 0