回答ありがとうございます。

> Con.Closeは　　End Usingを書けば必要ないという事でしたので
 > CLOSEされていると思うんですが・・・
　　ネットを検索して出てきたので　思い込んでしまっていたのですいませんでした

 > （con.CLOSEを書くとエラーになります）
エラー内容は　Finallyにて　con.Close()を追加すると　エラーのなり
内容は、'com'は宣言されていません。アクセス出来ない保護レベルになっています。

 > cmb.ExecuteNonQuery()
 > End Using　　
End Usingの後に　Con.Closeを記入すればエラーが起こりませんでした。
LISTBOXの内容も変更されました

どのようにしていいのか　まったく見当も付かなかった為助かりました。
どうもありがとうございました。