1

私はVB6からいくつかのsoulseek機能を制御しようとしています-問題はSysTabControl32です-どのタブが選択されているかをどのように読み取ることができますか？APIスパイはSysTabcontrol32のみを返し、タブボタンは返しません

4

1 に答える 1

2

TCM_GETCURSELメッセージを試してみることをお勧めします。現在選択されているタブのインデックスを返す必要があります。

コードは次のようなものです-私はこれをvbAcceleratorのcTabCtrlから適応させましたが、テストしていません。

Private Const TCM_FIRST = &H1300 
Private Const TCM_GETCURSEL = (TCM_FIRST + 11)
Private Declare Function SendMessageLong Lib "user32" Alias "SendMessageA" _
 (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As _
 Long) As Long

Public Function SelectedTab(ByVal hWnd As Long) As Long
    SelectedTab = SendMessageLong(hWnd, TCM_GETCURSEL, 0, 0) + 1
End Property
于 2010-03-18T10:33:37.367 に答える