ACCESS:变量文本根据报表中的字段长度对齐

Question

我想让文本框根据所包含数据的长度更改报表的对齐方式。

例如：

如果文本的长度小于 100，则左对齐。 如果它大于或等于 100，则分布...

这可能吗？

我不是 vba 编程专家，所以任何帮助我将不胜感激

Answer 1

可以通过根据文本长度确定对齐方式来使用 vba。您也可以将其应用于字段的任何其他属性

If Len(myfield) < 100 Then myfield.TextAlign = 1 Else myfield.TextAlign = 4

有关更多详细信息，请查看此内容。

将其添加到报告的详细信息部分，以将更改应用于每个条目。对于您的方法，最终的 Sub 应如下所示：

Private Sub Detail_Paint()
If Len(CommRule) < 100 Then CommRule.TextAlign = 1 Else CommRule.TextAlign = 4
End Sub

简而言之：如果您的 CommRule 值的长度(文本中的字符数(小于 100(然后(将 CommRule 的对齐方式设置为"左"(= 1(，否则将其设置为"分布"(= 4(