Personal Mind of ASEP

Sepercik Rasa yang Tercurah

Cara Ngewarnain FlexGrid

Disini gw post gimana seh cara ngewarnain suatu flexgrid pada baris-baris tertente yang kepengen dikasih warna
Pertama dibikin dulu sebuah modul yang bakalan ngedefinisiin baris mana yang akan di warnain (mau merah…mau biru…mau kuning…tersedah dahh)

=> Deklarasi

dim J as Integer

dim i as Integer

Public Sub MSFlexGridColors(ColorGrid As MSFlexGrid)

For J = 0 To ColorGrid.Cols – 1

For i = 1 To ColorGrid.Rows – 1
‘If i / 2 Int(i / 2) Then
If MSFlexGrid1.TextMatrix(i, 3) = “6” Then
ColorGrid.Col = J
ColorGrid.Row = i
ColorGrid.CellBackColor = &H80FFFF
End If
Next i
Next J
End Sub

Setelah modulnya di bikin, baru dilakuin pemanggilan terhadap modul ntu, pemanggilan ini bisa di tempatin dimana aje, tapi enaknya seh setelah loading data ke flexgrid, baru masukin dah kode ini :

MSFlexGridColors Me.MSFlexGrid1

March 1, 2006 - Posted by | Uncategorized

No comments yet.

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s

%d bloggers like this: