こんにちは。  
 
>Button１.Enabled = False  
>  
>'処理  
>  
>Button１.Enabled = True  
としても、処理が終わるときにはEnabledがTrueに  
なってしまっているので、この方法では対処できません。  
 
Timerを使ってみてはどうでしょうか？  
 
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click  
Button1.Enabled = False  
 
'処理  
 
Timer1.Enabled = True  
End Sub  
 
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick  
Button1.Enabled = True  
Timer1.Enabled = False 
End Sub