vb6：按代码设置SysTabControl32

Question

我正在编写一个用于控制soulseek的小应用程序 - 我想要做的是按代码点击“搜索文件”按钮。

我已获得选项卡式控件（SysTabControl32）的句柄并设法更改选项卡 使用以下代码：

rc1 = SendMessage(hwnd, TCM_SETCURFOCUS, ByVal 0, ByVal 0&)  

问题：

标签控件正在更改为正确的按钮，但没有任何反应。 我假设我也必须向它发送一个鼠标点击，就像用鼠标点击一样，按钮会再次向下和向上移动。

任何想法如何做到这一点？

THX

Answer 1

改为使用TCM_SETCURSEL。

Private Const TCM_FIRST               As Long = &H1300
Private Const TCM_SETCURSEL           As Long = (TCM_FIRST + 12)