api - vb6：通过代码设置 SysTabControl32

Question

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

我已经掌握了选项卡式控件（SysTabControl32）的句柄，并设法使用以下代码更改了选项卡：

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

问题：

选项卡控件正在更改为正确的按钮，但没有任何反应。我假设我还必须向它发送鼠标点击，因为当用鼠标点击时，按钮会再次向下和向上。

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

谢谢

Answer 1

请改用TCM_SETCURSEL。

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