Ako zmeniť písmo RichEdit pomocou ComboBox zoznam písiem v jazyku Visual Basic

RichEdit , tiež volal RichTextBox alebo Rich Text Editor , je použitie ovládacieho prvku v NET programovania , ako je Visual Basic .. S RichEdit , môžete zadať a formátovať text , ako by ste v textovom editore . Ak chcete zmeniť písmo , stačí pridať zoznam dostupných písiem a použiť tento zoznam upraviť bohatý textový editor v dobe behu . Pokyny dovolená 1

Pridajte nasledujúce príkazy Imports do hornej časti súboru formulára , ktorý obsahuje textový editor a pole so zoznamom :

Dovoz System.DrawingImports System.Drawing.Text

2

skopírujte a vložte nasledujúci kód do formulára triedy :

Private Sub Form1_Load ( byval sender Ako System.Object , Bývalá e As System.EventArgs ) Kľuky MyBase.LoadDim IFC Ako InstalledFontCollection = New InstalledFontCollection ( ) ComboBox1.Items.AddRange ( ifc.Families ) End Sub

Private Sub ComboBox1_SelectedIndexChanged ( byval sender Ako System.Object , Bývalá e As System.EventArgs ) Kľuky ComboBox1.SelectedIndexChangedRichTextBox1.Font = new Font ( ComboBox1 . SelectedText , 12 ) End Sub
3

Stlačte " F5 " pre spustenie aplikácie . Ovládanie Combo Box bude mať všetky nainštalované fonty počítača . Ak zmeníte písmo , bude RichTextEditor používať písmo ste vybrali .

• Predchádzajúca strana: Microsoft Word VBA Tutorial 
• Ďalšia strana: Ako zmeniť systémového dátumu pomocou jazyka Visual Basic