> CON.Open()
> Dim selectcommand As String = "UPDATE tantousya SET ta_mei = '{0}' WHERE ta_no = {1};"
> Using cmb As OleDbCommand = New OleDbCommand( String.Format(selectcommand, TextBox2.Text, TextBox1.Text), CON)
> cmb.ExecuteNonQuery()
> End Using　　　　　
> '＊＊＊＊＊＊＊＊＊＊リストボックスセット＊＊＊＊＊＊＊＊＊＊
> LISTBOX_SET()
Connectionをオープンして更新して閉じないでLISTBOX_SETで新しいConnectionを開いて
取得しているので、データを取得しているので反映されていないデータを取得しているのでは
ないでしょうか？自動トランザクションがコミットされていないような感じと思う。閉じてから
LISTBOX_SETを呼ぶか、同じConnectionでデータ取得をすると良いかと思います。