Originariamente inviato da RichiFra03
Non so il perchè, ma non funziona...
Il codice che ho messo è questo:
codice:
FontDialog1.Font = CType(TabControl1.SelectedTab.Controls.Item(0), RichTextBox).Font
If FontDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
CType(TabControl1.SelectedTab.Controls.Item(0), RichTextBox).SelectionFont = FontDialog1.Font
Else
Return
End If
p.s. Nel tabcontrol ho più pagine, ogniuna delle quali ha una rtb, e la tabpage.tag= nome della rtb che sta nella pagina e viceversa
Grazie ancora!
Ma vuoi che solo il testo selezionato cambi testo oppure tutto quanto?
Perchè il codice che hai creato funziona solo se selezioni il testo con il font modificato...
codice:
FontDialog1.Font = CType(TabControl1.SelectedTab.Controls.Item(0), RichTextBox).Font
If FontDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
CType(TabControl1.SelectedTab.Controls.Item(0), RichTextBox).Font = FontDialog1.Font
Else
Return
End If
così fa quello che dici..
Quello che stavi facendo era cambiare il font selezionato e poi dopo sei andato ad assegnare il font di 'default' della rtb alla FontDialog..
per esempio se tu con il tuo codice selezionavi un testo, cambiavi il font e dopo prima di aprire la FontDialog selezionavi il testo con il font modificato funzionava.