Compare Text and if begining is different then make the text red

[mchadwick]

I have 2 fields in a record. the first 2 characters of the fields should be the same if they are not, I wouild like to make the text red so it stands out. Example:



R1-core\bjones is in the LANDID field
R1-core_-_Group is in the Group name field.
This would be fine becuase "R1" is the same on both fields

R1-core\bjones is in the LANDID field
R2-core_-_Group is in the Group name field.
This would be incorrect becuase they both have to begin with "R1" The LANID field will always be correct and the "Group Name" field would contain any mistakes.

This is also a subform if it matters

[ranman256]

ON CURRENT event of the form

if left(txtLandid,2) =  left(txtGroup,2) then
   txtBox.backcolor = vbWhite
else
   txtBox.backcolor = vbRed
end if

[June7]

Programmatically setting properties of controls in form set for Continuous or Datasheet view won't work. Use Conditional Formatting.

[mchadwick]

I did try the code and I didn't work for me. I know how to create conditional formating, but I am not sure what I need to write up in order for it to compare just the first 2 characters to ensure they are the same. Can you tell me how to do that?

[ssanfu]

Very easy to set up conditional formatting:

1) Open the form in design view.
2) Click on the "Group" control.
3) In the menu, click on the FORMAT tab
4) Click on "Conditional Formatting"
5) Click on "New Rule"
6) In the first combo box, change to "Expression Is"
7) In the text box enter Left([LANDID],2)<>Left([GROUP],2) << these are the control names
8) Under the text box, click on the "A" and select the color you want.
9) Click OK, then OK again.
10)Change the form to normal view.

Review the records.

[mchadwick]

Oh this is nice! Thank you very much for your help on this.