二个选项组组合的问题(已解决)

szlga

在窗体上建立二个单选按钮的Frame，Frame1为查询类别，Frame2为具体查询条件，请问如何做到Frmae2的个别选项在Frame1取不同值时状态变为不可用。

以实例表示如下：

Frame1有3个选项，如A，B，C，分别对应值1、2、3

Frmae2有4个选项，如aa,bb,cc,dd,分别对应值1、2、3、4

具体查询以Frame1和Frmae2的值组合打开不同的查询结果。如，如组合为Aaa时，打开查询1，组合为Abb,时，打开查询2，这样总共有12种组合可能，但实际上有些条件组合是没意义的，因此希望在Frame1取不同值时，Frame2的个别条件显示为不可用状态，以排除这种没意义的查询组合。

请问该如何实现？

[此贴子已经被作者于2007-5-13 15:10:02编辑过]

szlga

刚才搜索到了http://www.office-cn.net/vvb/dispbbs.asp?BoardID=2&replyID=2832&id=568&skin=0一贴，看了竹笛的做法，很受启发，本人刚用Access，不懂VB，试着写了一句代码，但不起作用，请高手帮助。

Private Sub 条件Frame_AfterUpdate()
If 类.Frame <> 1 Then Option44.Visible = False

End Sub

说明：Option44是条件Frame里的选项。类Frame是第1个Frame.

szlga

问题现在基本解决了。刚才的问题是不应该是设条件Frame的更新后属性，而是应该设类Frame的更新后属性。另外.visible属性是让控件不可见，而我要的是不可用。自已做了个测试窗体，添加了按钮，先在属性里将其设为不可用，发现是.Enabledn属性，将其设为False即可。

Private Sub 类Frame_AfterUpdate()
    If 类Frame <> 1 Then Option44.Enabled = False
End Sub

现在新的问题是：

1、我看到有的例子里if 语句还要加个end if ，我试着加了，但却报错。

2、上述在IF 条件成立时，只执行了一个操作，即Option44.Enabled = False,如果想要执行多个操作代码还该怎么写？难道要写若干了IF 语句，有没有简单的办法。

3、当类Frame的值不为1时，Option44为不可用，但当值为1时，可用状态也不能及时变更回来，只有关闭窗体，再重新打开才行，怎样在当值重新为1时，Option44.Enabled返回Ture?

szlga

解决了，耐心看了帮助文件，认真学习了if...then...else语法，问题全部解决了。