根据数据选择显示某些文本

Question

我正在创建一个显示数据库中所有部分的表单（来自我们的主组件表名为TAGS）。所有值都显示正常，因为它从TAG表中拉出。问题是，在创建表时，他们从未输入每种组件类型的描述。

例如，在表格中，为了清楚起见，TagLabel“CON”应该在报告中描述“Condensers”（一些标签标签不是很直观）。

我正在尝试使用VBA代码来格式化TagLabel框旁边的文本框（TagDescription），该框显示基于TagLabel的描述。对此的“简单”但非常繁琐的解决方案是通过TAG表并手动添加描述列。

我正在尝试这样做以避免这种情况：

Private Sub Report_Page()
If Me.TagLabel = "CON" Then
    Set Me.TagDescription = "Condensers"
End If
End Sub

我确信这只是一个简单的语法修复，但我尝试了一些不起作用的事情，例如在{{1}的末尾添加.value和.text等等，提前感谢您的帮助！

Answer 1

这可能是你正在寻找的语法，但我确定你是否会得到你想要的效果。这听起来像是一个非常难看的解决方案。

Private Sub Report_Page()
    If TagLabel = "CON" Then
       TagDescription = "Condensers"
    End If
End Sub

如果您要为每个可能的TagLabel构建一个大的IF块，那么您应该咬紧牙关并使用查找表以正确的方式执行。

只需在标签查找表中创建一个新列并更新标签 - 更不用说打字然后再做你正在谈论的所有代码。然后很容易将表格加入报表查询，您的文本框将自动填充