Question

VB中有没有VISIBLE为flase 的控件能运行时不可见能响应单击事件的。

或者哪个API函数可以设置鼠标点击窗体某区域会响应单击事件。谢谢谢谢。
解决加50分。

Answer 1

运行时不可见意味着该控件不处于"活动状态",所以无法响应任何事件的.
我有一个建议,你试试看.
在form上添加一个image控件内部不加载任何图片,在image_click()事件下编写代码:print "123456",当窗体运行后,你单击image所在的区域,窗体上就会显示出"123456".这种做法能对不可见的图象框响应单击事件.不知道能否解决你的困难.

Answer 2

在窗体上添加控件-Label1,Command1,粘贴代码测试下吧:

Private Sub Command1_Click()
Label1.Visible = False
End Sub

Private Sub Form_Load()
Label1.Top = 0
Label1.Left = 0
Label1.Width = 1095
Label1.Height = 855
Label1.FontSize = 10
Label1.BackColor = &HFFFFFF
Label1.Caption = "Label隐藏后单击白色区域!"
Command1.Caption = "隐藏Label"
End Sub

Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If (X > 0 And X < Label1.Width) And (Y > 0 And Y < Label1.Height) Then
MsgBox "窗体指定区域被单击!"
End If
End Sub

Answer 3

不必要API那么麻烦，在点击父控件时（例如TextBox直接放在Form上，那么Form就是他的父控件），如果范围在这个控件的区域内，调用此控件的Mouse_Down事件

Answer 4

写委托事件