Too complex in sed, but much easier in Perl:
perl -pe '/b/g and substr($_, pos) =~ s/a/A/g'
The first match `/b/g` matches the first `b` in the string which sets `pos` to its position. Then, the substring starting at that position undergoes the substitution.