Public Delegate Sub myDelegate()
Private Sub SetLabel()
Label1.Text = ""
End Sub
Private Sub SplitFile()
Label1.Invoke(New myDelegate(AddressOf SetLabel))
End Sub
Public Delegate Sub myDelegate()
Private Sub SetLabel()
Label1.Text = ""
End Sub
Private Sub SplitFile()
Label1.Invoke(New myDelegate(AddressOf SetLabel))
End Sub