Member Avatar for Ravi Kant

I am doing a project in VB and have used ADODC connection to connect in Access Database. I have used MSHFlexGrid and want it's data get highlighted Automatically if it is on current date (i.e Today's Date) for Birthday Reminder. How can i do it?

  • 2 Contributors
  • 1 Reply
  • 131 Views
  • 1 Day Discussion Span
  • Latest Post Latest Post by QVeen72
Member Avatar for QVeen72

Hi,

Once the Grid is Loaded, Loop thru the column and Highlight if matching, Say, you are Date Column is 2, Check this Code:

Dim i As Integer
For i = 1 To Grd.Rows-1
If ISDate(Grd.TextMatrix(i,2)) Then
  If CDate(Grd.TextMatrix(i,2)) = Date Then
      Grd.Col = 2
      Grd.Row = i
      Grd.CellFontBold = True
     Grd.CellBackColor = vbBlue
     Grd.CellFontColor = vbWhite
  End If
Next

Change Control Name accordingly..

Regards
Veena

Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.