2011-07-26 8 views
0

================================== EDITからComboListプログラムを塗りつぶし=私は次のようにして固定して=================================アクセス2007 - DBテーブル

私はいくつかのエラーが発生しました:

Me.ADComponentNumber.RowSource = "SELECT [Components].[ID], [Components].[ComponentNumber] FROM Components WHERE [Components].[Items_Id] = " + Me.ADItemNumber.Column(0) + " ORDER BY [Components].[ComponentNumber]" 

========================================= ================================

私は、DBテーブルからプログラム的にコンボリストを埋めるために望んでいました。私は、値集合ソースアップの設定のようないくつかのことを試してみたが、それは動作しません。以下のコードを参照してください:

// Basically when a user selects an item form `Item Number` combo list 
// The `ADItemNumber_Change()` function is supposed to get the `Item.ID` (Column(0)) number 
// and feed it to the `ADComponentNumber.RowSource`, which is then supposed to 
// fill the list with Components whose `Components.Item_ID` fields matches `Item.ID` number. 
// NOTHING IS GETTING FILLED OUT IN THE LIST... 
Private Sub ADItemNumber_Change() 
    Me.ADComponentNumber.RowSource = vbNullString 
    Me.ADComponentNumber.RowSourceType = "Table/Query" 
    Me.ADComponentNumber.RowSource = "SELECT [Components].[ID], [Components].[ComponentsNumber] FROM Components WHERE [Components].[Items_Id] = Me.ADItemNumber.Column(0) ORDER BY [Components].[ComponentNumber]" 
    Me.Refresh 
End Sub 

私はそれが動作するように何かを失っていると確信しています。

ありがとう、

答えて

0

私自身の問題を解決できました。私の質問にEDITセクションを参照してください

関連する問題