女。又曾于西园弄狗与人兽交。中平二年，洛阳南宫云台、乐成门火灾，中常侍张让、赵忠说服汉灵帝将田亩每亩增加十钱，作为「修宫捐」，在修筑宫殿的材料上又大为苛刻，并且借机压榨各州郡财物，到后来刺史、太守、各级官吏的变动，都得支付「助军捐」或「修宫捐」。直到鉅鹿太守司马直上奏指控政府且服毒自杀后，汉灵帝才停止征收「修宫捐」。同年，崔烈付了五百万钱担任了司徒，汉灵帝对左右亲信说：「当时真应该坚持下去，这个官可以卖千万钱啊。」程夫人在旁说：「崔烈是冀州名士，怎么肯买官，是看在我的份上才出了五百万钱，你还不满意啊。」