>I would create a custom class of the textbox. Then add an Assign method to the Value property with the following:
>
>

>LPARAMETERS txValue
>this.ForeColor = RGB(0,0,0)
>IF VARTYPE(txValue) = "N"
>  IF txValue >= 0.00
>    this.Value = txValue
>  ELSE
>    this.Value = "(" + ABS(txValue) + ")"
>    this.ForeColor = RGB(255,0,0)
>  ENDIF
>ELSE
>  this.Value = txValue
>ENDIF
>

Thank you sir.