VB Code:
  1. Dim cMatrix As New ColorMatrix(New Single()() _
  2.                                           {New Single() {0.299, 0.299, 0.299, 0, 0}, _
  3.                                            New Single() {0.587, 0.587, 0.587, 0, 0}, _
  4.                                            New Single() {0.114, 0.114, 0.114, 0, 0}, _
  5.                                            New Single() {0, 0, 0, 1, 0}, _
  6.                                            New Single() {0, 0, 0, 0, 1}})

no luck so far
I had posted this in the CodeBank section