vb.net には、書き込みテキスト用のリッチ テキスト ボックスとフォント名用のコンボ ボックスがあります。私はこのコードでコンボボックスにフォントを追加しました:
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim ff As FontFamily
For Each ff In System.Drawing.FontFamily.Families
FontName.Items.Add(ff.Name)
Next
End Sub
しかし、リッチテキストボックスのフォント名を変更する方法がわかりません。