vb2010: combinare + stili di stampa

[karug64]

Salve a tutti.
Sto cercando di capire come funziona la stampa in vb2010 (senza crystal report)

Ho visto che con questa istruzione :

Dim Font4 As New Font("Arial", 7, FontStyle.Regular)

definisco il font da usare.

Ma non riesco a capire come posso fare a stampare una riga (o un campo) in grassetto, sottolineato e italico.

Come si possono unire i vari fontstyle ?

Grazie

[SirJo]

FontStyle.Bold + FontStyle.Italic

[karug64]

Non funziona.

Se scrivo

e.Graphics.DrawString(Format(dts.Tables("Righe_estratte").Rows(i).Item(15), "#,##0.00"), (FontStyle.Italic + FontStyle.Bold + FontStyle.Underline), Brushes.Black, RectangleF.op_Implicit(displayRectangle), format2)

Ottengo questo errore:

Errore    1    Risoluzione dell'overload non riuscita perché nessun 'DrawString' accessibile può essere chiamato con questi argomenti: 
    'Public Sub DrawString(s As String, font As System.Drawing.Font, brush As System.Drawing.Brush, layoutRectangle As System.Drawing.RectangleF, format As System.Drawing.StringFormat)': Impossibile convertire il valore di tipo 'Integer' in 'System.Drawing.Font'.
    'Public Sub DrawString(s As String, font As System.Drawing.Font, brush As System.Drawing.Brush, point As System.Drawing.PointF, format As System.Drawing.StringFormat)': Impossibile convertire il valore di tipo 'Integer' in 'System.Drawing.Font'.
    'Public Sub DrawString(s As String, font As System.Drawing.Font, brush As System.Drawing.Brush, point As System.Drawing.PointF, format As System.Drawing.StringFormat)': Impossibile convertire il valore di tipo 'System.Drawing.RectangleF' in 'System.Drawing.PointF'.
    'Public Sub DrawString(s As String, font As System.Drawing.Font, brush As System.Drawing.Brush, x As Single, y As Single)': Impossibile convertire il valore di tipo 'Integer' in 'System.Drawing.Font'.
    'Public Sub DrawString(s As String, font As System.Drawing.Font, brush As System.Drawing.Brush, x As Single, y As Single)': Impossibile convertire il valore di tipo 'System.Drawing.RectangleF' in 'Single'.
    'Public Sub DrawString(s As String, font As System.Drawing.Font, brush As System.Drawing.Brush, x As Single, y As Single)': Impossibile convertire il valore di tipo 'System.Drawing.StringFormat' in 'Single'.    D:\bapr\ccanom_vb\ccanom_vb\Form5.vb    492    29    ccanom_vb

.... cosa sbaglio ?

[SirJo]

Scusa ma ieri sera avevo il cellulare e non potevo scrivere molto.
Devi fare questo:

Dim Font4 As New Font("Arial", 7, FontStyle.Bold + FontStyle.Italic)

Sergio

[karug64]

Ciao
Ho appena provato quanto suggerito ma ottengo questo errore:

Errore	1	Risoluzione dell'overload non riuscita perché nessun 'New' accessibile può essere chiamato senza una conversione verso un tipo di dati più piccolo:     'Public Sub New(familyName As String, emSize As Single, unit As System.Drawing.GraphicsUnit)': Il parametro 'unit' corrispondente all'argomento viene convertito da 'Integer' a 'System.Drawing.GraphicsUnit', più piccolo.
    'Public Sub New(familyName As String, emSize As Single, style As System.Drawing.FontStyle)': Il parametro 'style' corrispondente all'argomento viene convertito da 'Integer' a 'System.Drawing.FontStyle', più piccolo.	D:\progetto\Form5.vb	372	13	form5_vb

Non capisco proprio ....

[oregon]

Dim Font4 As New Font("Arial", 7, FontStyle.Bold Or FontStyle.Italic)

[karug64]

Grazie.