1,451
社区成员
发帖
与我相关
我的任务
分享
...全文
请发表友善的回复…
发表回复
northwolves 2003-03-01
- 打赏
- 举报
Private Sub Command1_Click()
DIM H AS LONG
H=TEXT1.HWND
Dim X As Control
For Each X In Me.Controls
If X.hWnd = H Then MsgBox X.Name
Next
End Sub
DIM H AS LONG
H=TEXT1.HWND
Dim X As Control
For Each X In Me.Controls
If X.hWnd = H Then MsgBox X.Name
Next
End Sub
chanet 2003-02-28
- 打赏
- 举报
如果是在编辑自己写的话,知道句柄就可以了~~不过要用API,在VB里有点不通~~??
