Назначение нескольких свойств шрифту

Question

У меня есть код, в котором я разрешаю пользователю управлять различными атрибутами элементов управления в форме, то есть курсивом, полужирным, обратным цветом, ForeColor.

Моя проблема заключается в том, что когда пользователь выбирает курсивы & Полужирный, я не уверен, какой формат должен сделать это. Вот что я до сих пор.

For Each ctl As Control In frm.Controls 
    If TypeOf (ctl) Is Button Then 
     ctl.Font = New Font(ctl.Font, FontStyle.Italic) 
    End If 
Next 

Это эффект, который я хочу:

 ctl.Font = New Font(ctl.Font, FontStyle.Italic, FontStyle.Bold) 

Answer 1

Вы можете Or два вместе:

ctl.Font = New Font(ctl.Font, FontStyle.Italic Or FontStyle.Bold)