Vb.net 复制目录覆盖现有文件

我已经对我的自粘程序进行了编程，需要一些帮助

我已经设计了一种将模板从一个目录复制到另一个目录的方法

     'My.Computer.FileSystem.CopyDirectory("C:\MYapp\TEMPLATES\" & ComboBox1.Text, "C:\Myapp\PROJECTS\" & form1.label1.Text & "\Template")

但是，如果文件已经存在，则会重写或重写原始文件。在复制过程中，我需要能够在

“C:\MYapp\TEMPLATES\”和ComboBox1.Text中使用重命名文件

有没有办法继续这样做

我正在使用VB.net

EDDIT：

For Each CONTENTS_FILES In System.IO.Directory.GetFiles("C:\myapp\TEMPLATES\" & ComboBox1.Text)

    ' do whatever wtih filename
    System.IO.File.Copy("C:\myapp\TEMPLATES\" & ComboBox1.Text & CONTENTS_FILES, C:\myapp\PROJECTS\" & PROJECTS.PROJECTlabel.Text & "\Template\" & TimeOfDay & CONTENTS_FILES)
next

但是，我现在在代码中迷失了方向？
如果要避免覆盖现有文件，您需要一次复制一个文件，并测试每个文件是否已经存在：

If System.Io.File(THISFILENAME).Exists Then
    ' use a different name
Else
     ' continue
End If

对我展示的代码将进入一个循环中，比如您在编辑中添加的循环。您需要修复一些变量的类型，例如
CONTENTS\u FILES
它是什么？不要使用TIMEOFDAY，做一些简单的事情，比如
&.bak“
。