VB.Net - DataGridView Cell Formating

Merubah warna pada Cell DataGridView berdasarkan nilai yang diberikan. Disini nilai yg ane berikan yaitu apabila pada DataGridView kolom Qty terdapat value 0.

• Untuk langkah pertama buatlah database baru dan beri nama DbCoba,lalu buatlah tabel pada database coba dan beri nama  TabelBarang dengan fields : Kode_Barang, Nama_Barang & Qty.

• Setelah database dan tabel anda buat, bukalah project Visual Studio 2005, klik file, pilih New Project, Visual Basic, Windows Application,Ok.

• Drag n drop DataGridView ke form.

• Double klik form, pada event load, copas code berikut :

cn = New SqlConnection("server=(local)\sqlexpress;database=DbCoba;uid=UserId Anda;pwd=PasswordAnda")
cn.Open()
da = New SqlDataAdapter("select Kode_Barang as [KODE BARANG],Nama_Barang as [NAMA BARANG],QTY from TabelBarang", cn)
dt = New DataTable
da.Fill(dt)
DataGridView1.DataSource = dt

• Pada object DataGridView1 dan event CellFormatting copas code berikut :

If DataGridView1 .Columns(e.ColumnIndex).Name = "QTY" Then

If e.Value IsNot Nothing Then

If e.Value.ToString = "0" Then

e.CellStyle.BackColor = Color.Red

End If

End If

End If

• Selanjutnya run aplikasi anda.
• Selamat Mencoba :) ...

 Contoh preview form

Sumber