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

Question

我希望根据所包含数据的长度在报告上更改文本框。

例如：

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

这可能吗？

我不是vba编程的专家，所以任何帮助我都会感激

Answer 1

通过根据文本的长度确定对齐，可以使用vba。您也可以将相同的内容应用于您所在领域的任何其他属性

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

查看this了解更多详情。

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

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

单词：如果您的CommRule值的长度（文本中的字符数）小于100（那么）将CommRule的对齐方式设置为＆＃34; left＆＃34; （= 1），否则将其设置为＆＃34;分发＆＃34; （= 4）