Visual Basic - Comandos MS-Dos

Hola a todos:
Tengo que copiar y borrar archivos desde una aplicación VB, pero que sea un proceso invisible para el usuario.
Para ello he pensado ejecutar comandos MS-Dos como el "copy" o el "del", desde mi aplicación VB, utilizando el 'shell', pero no tengo esos comandos Ms-Dos (pq vienen integrados en el Command.com)
¿Donde puedo encontrarlos? o bien sabeis alguna solución alternativa sin tener que utilizar estos comandos de MS-Dos.
Gracias

Lo mejor es utilizar esto:
Para copiar:
Public Function Copiar(ArchivoOrigen as String, ArchivoDestino As String) As Boolean
Dim existeOrigen as String, existeDestino as String
existeOrigen = Dir(ArchivoOrigen)
existeDestino = Dir(ArchivoDestino)

If existeOrigen = "" Or existeDestino = "" Then
Copiar = False
Enlse
FileCopy ArchivoOrigen, ArchivoDestino 'Copia
End If
End function

Para Borrar:
Public Function Borrar(ArchivoABorrar as String) As Boolean
Dim existe as String
existe = Dir(ArchivoABorrar)
If existe<>"" Then
Kill ArchivoaBorrar 'Borra
Borrar = True
Else
Borrar = False
End If
End Function

Pero si quieres utilizar el shell, crea un copiar.bat de esta forma desde MS-DOS:
c:\>copy con copiar.bat
c:\>@echo off
c:\>copy %1 %2
c:\>exit
c:\>^Z (presiona F6)

También un borrar.bat:
c:\>copy con borrar.bat
c:\>@echo off
c:\>del %1
c:\>exit
c:\>^Z

Y en donde dice copia y Borra coloca respectivamente:
x= SHEL("copiar.bat " & ArchivoOrigen & " " & archivoDsetino, 7) 'Copiar

x= SHEL("borrar.bat " & ArchivoABorrar, 7)

Lo mejor es utilizar esto:
Para copiar:
Public Function Copiar(ArchivoOrigen as String, ArchivoDestino As String) As Boolean
Dim existeOrigen as String, existeDestino as String
existeOrigen = Dir(ArchivoOrigen)
existeDestino = Dir(ArchivoDestino)

If existeOrigen = "" Or existeDestino = "" Then
Copiar = False
Enlse
FileCopy ArchivoOrigen, ArchivoDestino 'Copia
End If
End function

Para Borrar:
Public Function Borrar(ArchivoABorrar as String) As Boolean
Dim existe as String
existe = Dir(ArchivoABorrar)
If existe<>"" Then
Kill ArchivoaBorrar 'Borra
Borrar = True
Else
Borrar = False
End If
End Function

Pero si quieres utilizar el shell, crea un copiar.bat de esta forma desde MS-DOS:
c:\>copy con copiar.bat
c:\>@echo off
c:\>copy %1 %2
c:\>exit
c:\>^Z (presiona F6)

También un borrar.bat:
c:\>copy con borrar.bat
c:\>@echo off
c:\>del %1
c:\>exit
c:\>^Z

Y en donde dice copia y Borra coloca respectivamente:
x= SHEL("copiar.bat " & ArchivoOrigen & " " & archivoDsetino, 7) 'Copiar

x= SHEL("borrar.bat " & ArchivoABorrar, 7)