C#

public F_Main()
{
    InitializeComponent();
    files = Directory.GetFiles(dir);
    this.Text = string.Format("{0:D3} - {1:D3} - {2:D3}", 1, 12, 120);
}

Henry Minute wrote:

this.Text = string.Format("{0:D3} - {1:D3} - {2:D3}", 1, 12, 120);

musefan wrote:

it will only work for a fixed number of files,

Bitmap picture = new Bitmap(800, 600);
picture = new Bitmap(images[0]);
PB_Image.Image = new Bitmap(picture);
picture.Dispose();
TB_Old_Name.Text = Path.GetFileNameWithoutExtension(images[0]);

L_Status.Text = "";
File.Move(Path.GetFullPath(images[current]), Path.GetFullPath(TB_New_Name.Text));
L_Status.Text = "image '" + images[current] + "." + extension + "'\r\nhas been renamed to\r\n'"                                             
+TB_New_Name.Text + "." + extension + "'";
images[current] = TB_New_Name.Text;

Harry666 wrote:

Excel.Range range = sheet.get_Range(sheet.Cells[16, 1], sheet.Cells[18, 37]);// this is "A16:AK18"

objRange = objSheet.get_Range("A16", "AK18");
objRange.Select();
objRange.Insert(XlInsertShiftDirection.xlShiftDown, objRange);

objRange = objSheet.get_Range("A6", "AK8");
objRange.Select();
objRange.Insert(XlInsertShiftDirection.xlShiftDown, XlInsertFormatOrigin.xlFormatFromLeftOrAbove);

Range("A1:E11").Select<br />
Selection.Copy<br />
Range("A16").Select<br />
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _<br />
    SkipBlanks:=False, Transpose:=False<br />

//Select Range to Copy
objRange = objSheet.get_Range("A4", "C14");
//Activate Selection
objRange.Select();
//Copy Selection
objRange.Copy();
//Select the Starting cell to copy to
Microsoft.Office.Interop.Excel.Range myCell1 = objSheet.get_Range("A16",
    System.Reflection.Missing.Value);
//Activate the Cell
myCell1.Activate();
//Paste with the formats
objRange.PasteSpecial(Microsoft.Office.Interop.Excel.XlPasteType.xlPasteFormats,
    Microsoft.Office.Interop.Excel.XlPasteSpecialOperation.xlPasteSpecialOperationNone,
    false, false);

//Select the Range where you want to insert the data into
objRange = objSheet.get_Range("A6", "AK6");
objRange.Select();
//Insert Blank Line
objRange.Insert(XlInsertShiftDirection.xlShiftDown, XlInsertFormatOrigin.xlFormatFromLeftOrAbove);
//Now go and select the data with the formatting that you want to copy.
objRange = objSheet.get_Range("A10", "Y10");
objRange.Select();
objRange.Copy(Type.Missing);
//Go back and select the first cell where you want to copy the data to
objRange = objSheet.get_Range("A6", Type.Missing);
objRange.Activate();
objRange.PasteSpecial(XlPasteType.xlPasteAll, XlPasteSpecialOperation.xlPasteSpecialOperationNone,
    false, false);