指定ファイルへ新たなコンボボックス項目を登録

コンボボックスの項目をテキストファイルに保存しているのだが、
新たにコンボボックス項目を追加するとき、既存の項目と
突き合わせて、一致しないときだけ、ファイルに書き込む処理が欲しい。
コンボボックスは複数あるので、一律に使えるように
作ってみたのが以下のソース。



Private sw As System.IO.StreamWriter

Private Sub CmbRegist(ByVal ctrl As System.Windows.Forms.ComboBox,_
            ByVal Path As String)
      Dim count As Integer
        For count = 0 To ctrl.Items.Count - 1
          If ctrl.Text = ctrl.Items.Item(count).ToString() Then
             Exit Try
          End If
        Next
        
        sw = New System.IO.StreamWriter(Path, True, enc) '開く
        sw.Write(vbCrLf) '改行
         sw.Write(ctrl.Text)
        
        '閉じる
        sw.Close()
End Sub