复选框的自动勾选

懒UFO

请问各位当一个二级窗体的所有复选框全部勾选之后，如何实现在一级窗体的一个复选框自动实现勾选的功能？

Roadbeg

1.如何触发事件:
在子窗体的所有复选框的 AfterUpdate 事件中写下以下代码:
if checkbox1 and checkbox2 and .... then
sendmsg '发送消息
endif

private sub sendmsg()
all=true
forms(一级窗体).form.setforce
end sub

在一级窗体的 GotForce 事件及 Activate 事件中写入以下代码:
if all then checkbox.value=-1

当然,直接用 Forms 引用一级窗体的控件更快捷.

[此贴子已经被作者于2003-2-15 8:58:31编辑过]

懒UFO

怎样侦测触发事件；怎样发送消息？

Roadbeg

方法:
1.在子窗体的所有复选框选取后,触发事件.
2.使用全局变量或其它方式传递该参数.
3.发送消息给一级窗体,以处理消息.

个人看法,不喜欢子窗体.因为我认为所有用子窗体的时候都可用一个窗体完成,且更好控制.

[此贴子已经被作者于2003-2-14 17:10:46编辑过]