Aiuto codici commondialog visual basic 6.0

[gattominr of gaara]

Ho un Problemino, non sò che codici mettere per il ShowFont del Common Dialog di Visual basic 6.0.

Io ho:
ComandoTesto: Text1
Commnd button : Command6
CMDialog : CommonDialog1

Che cod devo mettere nel command button per avere una cosa così:


Rispondete, è urgente.

[LukeProgrammer]

Per VB6 al momento non ho possibilità di provare a risolvere il tuo problema, ma ho fatto un test con VB.NET 2008 (standard edition) e il risultato è circa come lo vuoi tu.

Ho realizzato un form (form1) con 1 textbox multiline (textbox1) , 2 button (btnFont; btnColor), 1 FontDialog (FontDialog1) e 1 ColorDialog (ColorDialog1).
Questo è il codice che ho usato per far cambiare colore e font alla textbox:

[code]
Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnFont.Click
FontDialog1.Font = TextBox1.Font
FontDialog1.ShowDialog()
TextBox1.Font = FontDialog1.Font
End Sub

Private Sub btnColor_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnColor.Click
ColorDialog1.Color = TextBox1.ForeColor
ColorDialog1.ShowDialog()
TextBox1.ForeColor = ColorDialog1.Color
End Sub
End Class
[/code]

Spero ti sia stato utile.
Ciao

****************************
LukeProgrammer

[morganhk]

In questo VB.NET e VB6 sono praticamente identici