フォームを開くときに、コンボボックスの値を選択（アクセスVBA)

こんにちは。
アクセスVBAで、フォームを開いたとき
（フォームのOpenイベント）に、
コンボボックスの値を選択したいのですが、
どういう方法が、あるでしょうか。

理想は、
フォームのOpenないし、Loadイベント内で、
コンボ0.ItemData(2).Selected
と、書くような感じです。
（無論、Selectedは使えませんでした）。

よろしくお願いします。

No.1 ベストアンサー 回答者： AlexSuns 回答日時： 2007/05/14 20:04

これでいいのかな？

※テキスト書きなので検証していません

If コンボ0.ListCount > 0 Then
　　コンボ0.Value = コンボ0.Column(0, 2)
End If

この回答へのお礼

回答ありがとうございます。
コンボ0.Value=コンボ0.ItemData(2)
でできました。
考え方は、同じですね。
ありがとうございました。

お礼日時：2007/05/16 11:30

No.2 回答者： sugao_chib 回答日時： 2007/05/14 20:29

こんばんは

インデックスで指定するなら
　コンボ0.Value = コンボ0.ItemData(2)
値で指定するなら(値がわかっているなら)
　コンボ0.Value = "??"
こんな感じでどうでしょう。

この回答へのお礼

回答ありがとうございます。
コンボ0.Value=コンボ0.ItemData(2)
でできました。
ありがとうございました。

お礼日時：2007/05/16 11:31