Evaluate?

How do I convert the Evaluate function in VBA to VB6?

In VBA, Evaluate could evaluate object names eg.

Evaluate(CommandButton + buttonNumber).BackColor = &HFF&

In VB6, there seems to be no function for doing this.

Hmm, I hope that I understand you right.
This should do it:

Private Sub ChangeColor(ButtonNr As Integer)
COMMANDBUTTONARRAY(buttonNr).BackColor = &HFF&
'Replace the COMMANDBUTTONARRAY with the name of your ButtonArray
End Sub