フォルダをコピーするには、以下のようにします。サブフォルダやファイルもコピーされます。
Imports System.IO
Public Class FileSystemForm
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
'フォルダをコピーする 第3引数をTrueにすると既存を上書きする
My.Computer.FileSystem.CopyDirectory("c:\test", "c:\test2", True)
End Sub
End Class