Also erstmal verstehe ich nicht wieso du das so "umständlich" machst. Ich habe es jetzt mal ausprobiert und irgendwie ist es tatsächlich dasselbe als würde ich die Datei einfach umbenennen. Das heißt die eigentliche Aktion wäre ein 1-Zeiler:
Code:
Rename(quellPfad, zielPfad)
Dann werden Checkboxen eigentlich dazu verwendet Funktion an und abzuschalten, aber nicht um verschiedene Möglichkeiten anzubieten. Dafür verwendet man die OptionBox Komponente, die gleichzeitig mit sich führt, dass nur eine der Boxen angewählt werden kann. Dein jetziger Code führt nämlich zu Problemen, sobald ich mich einmal verklicke oder mich dann doch lieber umentscheiden möchte.
Code der Optionbox wäre ganz simpel:
Code:
If RadioButton1.Checked Then endung = ".pif"
Dann würde ich dir empfehlen, dass man die Datei per Drag&Drop einfügen kann.. dann würde das Textfeld natürlich auch die alte Dateieendung enthalten. Demnach müsste der Code des Buttons dann so aussehen:
Code:
quellPfad = Textbox1.Text
zielPfad = quellPfad.Remove(quellPfad.Length - 4, 4) & endung
Rename(quellPfad, zielPfad)
Dann noch die Beschriftung des Buttons in zb "Umbenennen" ändern, weil die jetzige einfach zu lächerlich ist.
Ein Programm sollte dem Anwender nämlich eigentlich Arbeit abnehmen.. würde man das ganze jetzt noch mit Drag&Drop versehen, würde man mit dem Programm evntl. 0.5 Sekunden schneller sein als von Hand. Heißt im Endeffekt, dass das Programm, da es eigentlich nichts macht, dem Benutzer die eigene Arbeit kaum erleichtert. Somit wäre es in meinen Augen nutzlos.