こんにちは。

以前、Formの全コントロールをクリアする方法を

Private Sub GetAllControls(ByVal control As Control)
   If control.HasChildren Then
      For Each childControl As Control In control.Controls
         GetAllControls(childControl)
        ' If TypeOf childControl Is TextBox Then
            childControl.Text = "花ちゃん"
        ' End If
      Next childControl
   End If
End Sub

と教えて頂きました。

ErrorProviderもクリアしたいのですが、
どうするとよいのですか？

宜しくお願いします。

http://msdn2.microsoft.com/ja-jp/library/system.windows.forms.errorprovider.clear(VS.80).aspx

これはどうでしょうか？

すいません。
ErrorProvider1.Clear()でOKでした。

> Private Sub GetAllControls(ByVal control As Control)
メソッド名と実際の処理が一致していないので、違和感があります。(^^;
Get は、「〜を取得する」といった意味ですし。


> ErrorProviderもクリアしたいのですが、
ErrorProvider は「コントロール」ではなく「コンポーネント」なので、列挙するには

  For Each c As Component In Me.Container.Components
    Dim ep As ErrorProvider = TryCast(c, ErrorProvider)
    If ep IsNot Nothing Then
      ep.Clear()
    End If
  Next

のような感じでどうでしょう。