使用Label存放需要打印的文字内容时,会发现无论内容多长,都无法自动换行,导致超出表格长度打印不美观。例如出现以下情况:
解决方法为,调整Label属性里MaximumSize的Width来达到自动换行的目的。
代码示例:
For I = 7 To 13
Me.Panel.Controls("LblOut" & CStr(I)).MaximumSize = New Size(ReadOneString(SvKey, "Printdef", I - 7), 0)
Next I
这是我测试的宽度调整为100时的效果:
这是我测试的宽度调整为200时的效果:
实际使用根据情况调整即可,可作为配置文件参数方便控制。