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)