Code to change color of text box

Im trying to change the color of a text box on a sheet using a macro. The following code is creating a runtime error 424:

TxtBxBarcodeMode.ForeColor = Color.Red