Crystal Report - Ordenar registros por código

Necesito obtener un listado ordenado por un campo variable segun varios RadioButton..

Cada uno indica porque campo debo ordenar.

Tengo codificado lo siguiente y no funciona

If rbCodigo.Checked Then
oField = .Database.Tables.Item(0).Fields.Item("Clientes.Codigo_Cli")
.DataDefinition.SortFields.Item(0).Field = oField
Else
oField = .Database.Tables.Item(0).Fields.Item("Clientes.Nombre_Cli")
.DataDefinition.SortFields.Item(0).Field = oField
End If

da el siguienete error

Código : 9
Descripción:El indice no es valido. (Excepcion de HRESULT:0x8002000B(DISP_E_BANDIDEX))