以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  4月16日更新  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=2476)
--  作者：狐狸爸爸
--  发布时间：2009/4/16 19:30:00
--  4月16日更新

1、窗口增加AfterClose事件，在关闭窗口后执行，此时还就可以引用窗口中的控件。
2、增加ActiveForm属性，可以返回活动窗口。

3、主窗口的主表加上了Visible属性
4、另有一些小改进：

复制表包括列标题了
汇总模式的统计列可以多选了
插入字段可以用标题作为标签了

[此贴子已经被作者于2009-4-16 19:34:16编辑过]
--  作者：狐狸爸爸
--  发布时间：2009/4/16 19:33:00
--  

ActiveForm


这是Forms集合的一个属性，用于返回活动窗口，如果没有活动窗口，则返回Nothing。


示例


Dim frm As WinForm.Form = Forms.ActiveForm
If frm IsNot Nothing Then
    MessageBox.Show("活动窗口为:" & frm.Name)
Else
    MessageBox.Show("无活动窗口!" )
End If


提示：上面的代码在命令窗口执行的时候，会一直提示无活动窗口，理由是什么，大家可以自己想想。

AfterClose


在关闭窗口时执行，此时还就可以引用窗口中的控件。


e参数属性：


Form：表示触发事件的窗口。
--  作者：smileboy
--  发布时间：2009/4/16 19:34:00
--  
图片点击可在新窗口打开查看
--  作者：t_fs
--  发布时间：2009/4/16 19:39:00
--  
图片点击可在新窗口打开查看
--  作者：ylm
--  发布时间：2009/4/16 19:40:00
--  

收到。
--  作者：gdlgh
--  发布时间：2009/4/16 19:44:00
--  
速度够快!顶
--  作者：yangming
--  发布时间：2009/4/16 21:33:00
--  
先顶啊,我还以为又要半夜才出炉呢,这么早啊,呵呵
--  作者：狐狸爸爸
--  发布时间：2009/4/16 22:02:00
--  
以下是引用yangming在2009-4-16 21:33:00的发言：
先顶啊,我还以为又要半夜才出炉呢,这么早啊,呵呵


呵呵，狐表和你打起游击战了。

图片点击可在新窗口打开查看
--  作者：易服
--  发布时间：2009/4/16 23:43:00
--  

图片点击可在新窗口打开查看此主题相关图片如下：注册系统.gif
图片点击可在新窗口打开查看
416版自带的注册系统设计演示
--  作者：kylin
--  发布时间：2009/4/17 8:06:00
--  

不顶不行！