Cara Menjumlahkan Nilai di Datagrid

Cara Menjumlahkan Nilai di Datagrid - Pada kesempatan kali ini saya akan berbagi tips dan trick untuk membuat penjumlahan pada datagrid di visual basic 0.6, untuk cara membuatnya silahkan simak panduannya dibawah ini.
  1. Buka Microsoft Visual Basic 0.6
  2. Buatlah sebuah database dengan nama dbLatihan dengan menggunakan Microsoft Access, seperti berikut ini.
  3. Buatlah sebuah form seperti berikut ini.
  4. Copas script berikut, kemudian masukan pada form yang tadi.
    Dim jumlah As Long

    Private Sub Form_Load()
        Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\dbLatihan.mdb"
        Adodc1.RecordSource = "Table1"
        Set DataGrid1.DataSource = Adodc1
        DataGrid1.Refresh
        Adodc1.Recordset.MoveFirst
        Do Until Adodc1.Recordset.EOF
            jumlah = jumlah + Adodc1.Recordset.Fields(1)
            Adodc1.Recordset.MoveNext
        Loop
        Label1.Caption = "Jumlah seluruh Nilai = " & jumlah
       
    End Sub
  5. Kemudian tekan RUN tau F5
Semoga dapat bermanfaat arikel mengenai Cara Menjumlahkan Nilai di Datagrid semoga bisa menambah wawasan belajar anda.
Reactions

Post a Comment

0 Comments