emilladia

Imports System
Imports System.IO
Imports System.Text
Public Class Form2
    Dim files As New ArrayList
    Dim inDir As String = "D:\CopyTo\"
    Dim outDir As String = "D:\CopyHere\"

    Public Sub SearchFiles(ByVal Pattern As String, ByVal Path As String, ByVal FilesFound As ArrayList)