字萬里，鄱陽人，明朝中期大臣。成化末進士。

弘治初，授御史，巡視京城。降人雜處畿甸多為盜，事發(fā)則投 戚里、奄豎為窟穴。程每先機制之，有發(fā)輒得。巡鹽兩浙，代還，巡視光祿。五年上疏言：“臣適見光祿造皇壇器。皇壇者，先帝修齋行法之所。陛下即位，此類廢斥盡，何復有皇壇煩置器？光祿金錢，悉民膏血。用得其當，猶恐病民，況投之無用地。頃 李孜省、繼曉輩倡邪說，而先帝篤信之者，意在遠希福壽也。今二人已伏重辟，則禍患之來，二人尚不能自免，豈能福壽他人。倘陛下果有此舉。宜遏之將萌。如無，請 治所司逢迎罪�！钡鄢鯚o皇壇造器之命，特光祿姑為備。帝得程奏大怒，以為暴揚先帝過，立下錦衣獄。給事中 叢蘭亦巡視光祿，繼上疏論之。帝宥蘭，奪 光祿卿胡恭等俸，付程刑部定罪。 尚書 彭韶等擬贖杖還職。帝欲置之死，命系之。韶等復疏救，程子尚三上章乞代父死，終不聽。是時巡按 陜西御史 嵩縣 李興亦坐酷刑系獄。及朝審，上興及程罪狀。詔興斬，程及家屬戍隆慶。文武大臣英國公 張懋等合疏言：“興所斃多罪犯，不宜當以死。程用諫為職，坐此戍邊，則作奸枉法者何以處之？”尚書 王恕又特疏救。乃減興死，杖之百，偕妻子戍 賓州，程竟無所減。程母李氏年老無他子，叩闕乞留侍養(yǎng)。 南京給事中毛珵等亦奏曰：“昔 劉禹錫附 王叔文當竄遠方， 裴度以其母老為請，得改 連州。陛下圣德，非 唐中主可比，而程罪亦異禹錫。祈少矜憐，全其母子�！辈辉S。子尚隨父戍所，遂舉 廣西鄉(xiāng)試。明年，帝念程母老，放還。其后， 劉瑾亂政，追論程巡鹽時稍虧額課，勒其家償。程死久矣，止遣一孫女。罄產(chǎn)不足，則并女鬻之，行道皆為流涕。