You have to color cell by cell. Try this code:
dt = New Table( "test", Add Rows( 6 ),
New Column( "Column 1", Numeric, "Continuous", Format( "Best", 12 ),
Set Values( [0, 1, 1, 0, 1, 0] ) ),
New Column( "Column 2", Character, "Nominal",
Set Values( {"A", "B", "C", "D", "E", "F"} ) ),
New Column( "Column 3", Character, "Nominal",
Set Values( {"G", "H", "I", "J", "K", "L"} ) )
);
// Make the rows light gray
light_gray = rgb color(200, 200, 200);
my_rows = dt << get rows where(:Column 1 == 1);
my_row_list = as list(my_rows);
column_list = dt << get column names(String);
for (i = 1, i <= nitems(column_list), i++,
column(dt, column_list[i]) << color cells(light_gray, my_row_list);
);