Available in the LEADTOOLS Imaging toolkit.
SavePage example for Visual Basic
‘ replace page 1 from TEST.TIF LEAD1.SavePage = 1 LEAD1.Save "TEST.TIF", FILE_TIF, 8, 0, SAVE_REPLACE