【求助】查询问题

like5188

我想要的效果是：
1。当选择进"进货数据查询"时，左边对应的文本框可编辑（不需要的条件处于不可编辑状态），下面子窗体显示进货数据查询信息（即进货数据查询 子窗体）。
2。当选择进"销售数据查询"时，左边对应的文本框可编辑（不需要的条件处于不可编辑状态），下面子窗体显示销售数据查询信息（即销售数据查询 子窗体）。
    希望高手能指点一下，最好能做其中一种情况。万分感谢。。。

like5188

2# xiazaidj
谢谢老师您的帮助，就是要这种效果。万分感谢

xiazaidj

回答:
很简单,加入判断代码就可以了.以下不知道是不是你想要的:
'========================================
If Me.Frame21 = 2 Then
Me.Text供应商简称.Enabled = False
Me.Text客户.Enabled = True
Me.Text付款情况.Enabled = True
Me.Child28.SourceObject = "查询.销售数据查询"
Else
If Me.Frame21 = 1 Then
Me.Text付款情况.Enabled = False
Me.Text客户.Enabled = False
Me.Text供应商简称.Enabled = True
Me.Child28.SourceObject = "查询.进货数据查询"
Else
End If
End If
'========================================
以上上传附件,请您看一下效果!