VBレスキュー(花ちゃん)
VB2005用トップページへVBレスキュー(花ちゃん)のトップページVB6.0用のトップページ各掲示板

リンク元へ戻ります。 コンボボックス関係のメニュー
1.ComboBox に関するワンポイントテクニック集
2.コンボボックスのドロップダウンリストをプログラムから表示する
3.コンボボックスのテキスト部の高さを設定する
4.コンボボックスのドロップダウンリスト項目数を変更する
5.アイコン付のコンボボックスを作成する
6.コンボボックスで重複しない項目だけを追加登録する
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.その他、当サイト内に掲載しているコンボボックスに関するサンプル


2.コンボボックスのドロップダウンリストをプログラムから表示する
1.コンボボックスのドロップダウンリストをプログラムから表示する
2. 
3. 
4. 
5. 
6. 

 下記プログラムコードに関する補足・注意事項 
動作確認:Windows Vista・Windows 7 (32bit) / VB6.0(SP6)
Option :[Option Explicit]
参照設定:
使用 API:SendMessage
その他 :このサンプルは、 Win32 APIを使用しておりますので、ある程度Win32 API が理解できる方がお使い下さい。
    :
このページのトップへ移動します。 1.コンボボックスのドロップダウンリストをプログラムから表示する

Option Explicit   'SampleNo=147 2002.06.08

'指定のウィンドウにメッセージを送る(P750)

Private Declare Function SendMessage Lib "user32" _
  Alias "SendMessageA" (ByVal hWnd As Long, ByVal wMsg As Long, _
  ByVal wParam As Long, lParam As Any) As Long
'ドロップダウンリストを表示・非表示にする(P791)
Private Const CB_SHOWDROPDOWN = &H14F

Private Sub Command1_Click()
  'wParam 開く時 = 1  閉じる時 = 0  lParam = 常に 0
  Call SendMessage(Combo1.hWnd, CB_SHOWDROPDOWN, 1&, ByVal 0&)
End Sub

Private Sub Form_Load()
  Combo1.AddItem "あいうえお"
  Combo1.AddItem "かきくけこ"
  Combo1.AddItem "さしすせそ"
End Sub

このページのトップへ移動します。 2. 



このページのトップへ移動します。 3.


このページのトップへ移動します。 4.


このページのトップへ移動します。 5.


このページのトップへ移動します。 6.


このページのトップへ移動します。 検索キーワード及びサンプルコードの別名(機能名)
ComboBox のドロップダウンリストをプログラムから表示する



このページのトップへ移動します。