通过选项组决定窗体对象的隐显

时　间:2011-05-04 10:14:14
作　者:不详   ID：304  城市：哈尔滨
摘　要:access设计，有时需要将窗体上的多余对象进行隐藏或显示。在主窗体上的某位置加一个选项组“frame”，在这个选项组的“更新后”事件里写以下代码－－

正　文:

        access设计，有时需要将窗体上的多余对象进行隐藏或显示。这种操作很有必要。比如职工信息主窗体上有三个子窗体“工作经历”、“教育状况”和“家庭状况”。如果分开平放，窗体上没有那么多的位置，且很难看。这时可以将三个子窗体设置成一样大小，然后重叠在一起。在主窗体上的某位置加一个选项组“frame”（可以是其他名字甚至中文名，但代码中也要进行相应修改），在这个选项组的“更新后”事件里写以下代码－－
 

'根据选定值判定显示的对象
    If Me.frame.Value = 1 Then '选项组的第一个选项
        Me.家庭状况.Visible = False
        Me.教育状况.Visible = False
        Me.工作经历.Visible = True
    Else
        If Me.frame.Value = 2 Then
        Me.工作经历.Visible = False
        Me.家庭状况.Visible = False
        Me.教育状况.Visible = True
    Else
        Me.工作经历.Visible = False
        Me.教育状况.Visible = False
        Me.家庭状况.Visible = True
    End If

   

    设置完成保存。再打开窗体时，当你点击某个选项时，就会显示相应子窗体，其他两个会自动隐藏。

Access软件网QQ交流群 (群号:54525238) 　　　　　　Access源码网店