ComboBoxとTextBoxを連結させるには

KKK 2008-10-29 03:06:02 No: 140753

こんにちは。
VB.NET 2005 + Oracle10gです。
コンボボックスとテキストボックスを連結させて、コンボボックスで
選択された表示名に対応したコードを、テキストボックスで表示させたいと思っています。

Dim Cn As New OleDbConnection(...)
        Dim SQLCm As OleDbCommand = Cn.CreateCommand
        Dim Adapter As New OleDbDataAdapter(SQLCm)
        Dim Table As New DataTable

SQLCm.CommandText = "SELECT * FROM DEPT WHERE DEPTNO =xxx"
Adapter.Fill(Table)

txt_Bunrui.DataBindings.Add("Text", Table, "DNAME")
txt_Syozai.DataBindings.Add("Text", Table, "LOC")

textをleaveするタイミングで上記のようにしたのですが
エラーが出てしまいます。

色々調べたのですが、完全に詰まってしまい
困っています。

どうぞ宜しくお願い致します。