ник: timrus
Пробовал с пробелами и подчеркиванием, но оно все равно до конца не подчеркивает, то есть длинна везде переменная. 56 - это количество символов, которые можно поместить в поле, не расширяя его.
Private Sub ЗаголовокГруппы1_Format(Cancel As Integer, FormatCount As Integer)
If FormatCount = 1 Then
Dim n As Byte
n = Len(Описание) Mod 56
If n <> 0 Then Описание = Описание & Space(56 - n)
End If
End Sub
|