Строки

[Atoman]

Есть длинные строки которые не помещаются в облось печати,
как обрезать их и добавить три точки?

[Nord777]

Код: Выделить всё

  Private Sub Form1_Paint(ByVal sender As Object, _
  ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint
    Dim Rect As New Rectangle(0, 0, 50, 120)
    Dim SF As New StringFormat()

    'не разрешать перенос слов
    SF.FormatFlags = StringFormatFlags.NoWrap
    'обрезка текста до ближайшего символа и вставка многоточия
    SF.Trimming = StringTrimming.EllipsisCharacter

    e.Graphics.DrawString("Длинная Строка", Me.Font, Brushes.Black, Rect, SF)
  End Sub

[Atoman]

Nord777
Спасибо то что надо.