0

MS Access と VBScript のプログラミング分野は初めてです。

ここから助けが必要な質問があります。

まず、MS Access データベースに 2 つのテーブルがあります。1 は Web、1 は所有者です。関係は 1 対多です (1 つの Web に複数の所有者を含めることができます)

3 つのコンボボックスで構成されるフォームがあります。コンボボックス 1 は webURL に使用されます コンボボックス 2 は所有者名 1 に使用されます コンボボックス 3 は所有者名 2 に使用されます

では、別の webURL (combobox1 内) を選択したときに、combobox2 とombobox3 を作成して、それぞれ ownername1 と ownername2 を表示するにはどうすればよいですか。さらに、このコンボボックス 2 とコンボボックス 3 のドロップダウン リストには、所有者テーブルにすべての所有者名を含める必要があります (更新ボタンをクリックしたときに所有者名をその特定の Web の他の人に変更できるようにするため)。

これで、webURL データをコンボボックス 1 に入力することしかできなくなりました。残りはどうしたらいいのかわからない..

サンプルデータは次のとおりです。

Web テーブル

形式に従う

webID (PK)、webURL

1 スタックオーバーフロー

2 Google.com

3 ヤフーコム

所有者テーブル

形式に従う

ownerID (PK)、ownerName、webID (FK)

1 法律 1

2 ハンス 1

3 ケント 2

4 ハワード 3

5 ウィリアム 3

ここであなたの助けに感謝します。

ありがとう！

4

2 に答える 2

0

機能を使用してみてくださいcombobox.rowsource =。ここに簡単な例があります...

Private Sub Test_Combo1_Click()
'when a value is selected or clicked from combobox1 then'

Dim var As String

'take the ID'
var = Me.Test_Combo1.Column(0)
Debug.Print var

'and use SQL statement to grab the corresponding link'
Me.Test_Combo2.RowSource = "Select ID, Link from URL where ID = " & var

End Sub
于 2013-05-26T14:12:29.910 に答える