private thStartCopy As System.Threading.Thread
private Sub Form_Load() Handles Me.Load
    thStartCopy = New System.Threading.Thread(AddressOf StartCopy)
 
end sub
 
private sub StartCopy
    '... irgendwas anzeigen (zb. modale Form....)
    '... kopieren
    '... irgendwas anzeigen (aus)
end sub