【求助】怎样用一个字段值来控制某控件能否显示或能否使用？

gargoyle

比如公司表中有公司属性字段，如果该字段为“用户”，则某控件可见或可选，否则不然。
实现这个效果必须VBA编程么？

多谢！

gargoyle

。。。
我先换另一个简单明了的问题。。。

“联系人”窗体中第一页“联系人信息”第二行，“Company”，这里想实现的是对于已存在的联系人，打开窗体后在这个“Company”里显示“联系人”所属公司的“公司名称”字段内容（“联系人”表与“公司表”以建立多对一关系）。似乎像是从当前窗体中的表记录中取得联接字段传递给一个查询，然后将结果返回给这窗体中的一个控件显示，但不知到应该怎样做？

Henry D. Sy

怎么搞得怎么复杂，再说也看不懂你再说什么

gargoyle

两个文件一样，我用的是FireFox+ie引擎，似乎无法正常显示“删除”按钮

gargoyle

谢谢版大！
我新上传了个带测试数据的。
以“项目”窗体为例
对问题2，我想实现的效果是：

在第二个标签页“相关信息”上，比如单击“代理商”后面的组合框，显示了“公司”表中“公司属性”为“代理”的公司名称的公司列表（这个似乎比较简单，就是个查询），然后在下面“代理商联系人”右侧组合框内单击，之后点击标签页控件下方的“浏览”按钮，该组合框右侧会出现（变为可见）一个列表框，里面按姓名列出所有前面选定的代理商的联系人，选择其中参与该项目的若干联系人后，有个确认/取消动作，确认后被选出的这几个联系人姓名就会构成左边“代理商联系人”组合框中的选项（仍然显示姓名），选中其中任何一个联系人，点击下方的“查看/编辑/新建”按钮，会打开“联系人”窗体，其中显示的数据就是之前选择的那个联系人的。

标签页控件下方的“浏览”和“查看/编辑/新建”按钮对上面的“制造商”和“制造商”联系人以及第一个标签页上的“用户联系人”可完成同样的动作，如果其它标签页有类似公司-联系人数据组合，均可用这下面的2个按钮来完成与前述同样的功能。

[ 本帖最后由 Henry D. Sy 于 2009-1-5 16:50 编辑 ]

friendship

呵呵，楼主的问题多发帖子哟，楼上的方法不错。值得我们学习

Henry D. Sy

问题二
利用组合框会方便的多

附件中应该留下数据作为测试用。

Henry D. Sy

问题一
Private Sub Form_Current()
    SetEnb
End Sub
Private Sub 公司属性_AfterUpdate()
    SetEnb
End Sub
Sub SetEnb()
    If Me.公司属性 = "用户" Then
        Me.Text9.Enabled = True
        Me.Command15.Enabled = True
    Else
        Me.Text9.Enabled = False
        Me.Command15.Enabled = False
    End If
End Sub

gargoyle

这是一个简化的东东：

这里面其实要实现几个个功能（原谅我贪心了）：

1）“公司”窗体
只有当标签页1（“公司信息”）中字段“公司属性”为“用户”时，第二个标签页“相关信息”中第二行的控件和按钮才可见或者可用（不可用时为灰色）。

2）“项目”窗体
第二页“相关信息”，比如第一行，一旦已经选定了“制造商”比如说A公司，左键单击后面的“制造商联系人”框，点击右下角的“浏览”按钮，会弹出一多选界面将A公司的所有联系人姓名列出，被选中的联系人组合为一组合框列表置于“制造商联系人”框中，选中任何一个联系人，点击右下角第二个按钮“查找/编辑 /新建”将会弹出“联系人”窗体显示相应的联系人信息。鼠标单击任何一个字段框，再点击“查找/编辑/新建”按钮都会弹出相应的“公司”或“联系人”窗口以显示前面文本框/组合框中选中对象的相关信息。感觉像是窗体-查询-窗体，级联地传递参数。这个感觉很复杂，但是活又急。。。

另外还有一个疑惑，就是在“关系”视图中，其实“公司”表只要在该公司的“公司属性”为“用户”时，才与“项目”表具有一对多关系，如果是“制造商”或“ 代理商”等其它属性，只在“项目”表中的相应字段中存有其“公司”表主键以备查询，但在“项目”窗体第二页中是通过“公司名称”和“属性”在公司表里查询的，只不过返回公司表主键值。
“联系人”信息也是如此。
所以这里不知道怎样设定联接关系好，是表联接还是查询联接好呢？

gargoyle

呵呵
等着啊，我得把我的东西简化一下，因为还涉及好多其它的问题