[เพิ่มเติม]ต้องการดึงข้อมูลจาก database access มาแสดงบน label กำลังทำ สถานะ การชำระเงิน

    Public Sub pending()

        con.Open()

        Dim dt As New DataTable("Tblcost")
        Dim rs As New OleDb.OleDbDataAdapter("Select * from Tblcost", con)
        rs.Fill(dt)
        DataGridView1.DataSource = dt
        DataGridView1.Refresh()

        Label28.Text = dt.Rows.Count

        rs.Dispose()

        con.Close()




    End Sub