Не печатается жирный текст

[Varaktor]

Подскажите пожалуйста, что я делаю неправильно. В приведенном ниже коде strI выводится на печать не жирная и не подчеркнутая.

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

ByVal e As Printing.PrintPageEventArgs)
        Dim strI As String = "bla-bla"
        Dim drawFontI As New Font("Times New Roman", 13, _
        FontStyle.Bold And FontStyle.Underline)
        Dim TextRectI As New RectangleF(x, y ,w, h)
        Dim SF As New StringFormat(StringFormatFlags.NoClip)
        Dim SF2 As New StringFormat(SF)
        e.Graphics.DrawString(strI, drawFontI, _
        Brushes.Black, TextRectI, SF2)

[Viper]

потому что вместо

FontStyle.Bold And FontStyle.Underline

должно быть

FontStyle.Bold Or FontStyle.Underline

[Varaktor]

И точно... Заработало, спасибо огромное, сам бы ни за что не додумался. А почему так? Я вроде хочу И жирный, И подчеркнутый, а писать надо жирный ИЛИ подчеркнутый...

[Viper]

Элементарно, в данном случае ты имеешь дело с битовыми флагами и побитовыми операциями. Например:

00010000
Or
00000001
---------------
00010001

т.е. после выполнения побитового ИЛИ оба бита установлены. В случае же побитового И получаем:

00010000
And
00000001
---------------
00000000

т.е. ни один бит не установлен. Освежи в памяти булевы/побитовые операции.

[Varaktor]

Теперь вкурил. Мне и не в ума, что здесь надо побитно... Viper, спасибо, что не лень с чайниками возиться.