[リストへもどる]
一括表示
投稿時間：2002/12/03(Tue) 15:35
投稿者名：たけ
Ｅメール：aaa
ＵＲＬ　：
タイトル：コンボボックスについて
下記の様にコンボの値を選択された時に初めて
取得したいのですが、コンボボックスプロパティ
のStyleが0の時はうまく行くのですが、
Styleを2にするとアクティブになっているだけで
表示されてしまいます。なに良い方法は無いでしょうか？

Private Sub Command1_Click()
End
End Sub

Private Sub Form_Load()
    Combo1.AddItem "aaa"
    Combo1.AddItem "bbb"
    Combo1.AddItem "ccc"
    Timer1.Interval = 1000
End Sub

Private Sub Timer1_Timer()
    Label1.Caption = Combo1.Text
End Sub

投稿時間：2002/12/03(Tue) 15:49
投稿者名：魔界の仮面弁士
Ｅメール：
ＵＲＬ　：
タイトル：Re: コンボボックスについて
> 下記の様にコンボの値を選択された時に初めて
> 取得したいのですが、コンボボックスプロパティ

ComboBoxのClickイベントでは駄目ですか？

投稿時間：2002/12/03(Tue) 16:08
投稿者名：花ちゃん
Ｅメール：
ＵＲＬ　：
タイトル：Re: コンボボックスについて
ここのＨＰの　他のコントロール関係　の
コンボボックスの項目をクリックせずにマウスカーソルの位置の内容を取得する
を見て下さい。Styleを2 でも取得できます。

投稿時間：2002/12/03(Tue) 16:45
投稿者名：たけ
Ｅメール：aaa
ＵＲＬ　：
タイトル：お礼
> 下記の様にコンボの値を選択された時に初めて
> 取得したいのですが、コンボボックスプロパティ
> のStyleが0の時はうまく行くのですが、
> Styleを2にするとアクティブになっているだけで
> 表示されてしまいます。なに良い方法は無いでしょうか？
>
> Private Sub Command1_Click()
> End
> End Sub
>
> Private Sub Form_Load()
>     Combo1.AddItem "aaa"
>     Combo1.AddItem "bbb"
>     Combo1.AddItem "ccc"
>     Timer1.Interval = 1000
> End Sub
>
> Private Sub Timer1_Timer()
>     Label1.Caption = Combo1.Text
> End Sub

Clickイベントで配列にインデックスを
取得してそのインデックスで表示させたら出来ました。
ありがとうございました。