HIRO's.NET

VB.NET, C#, PowerShell Tipsサイト

 VB.NET, C#, PowerShellを使用しているエンジニアのためのサイト。

 基本的な使用方法から開発で役立つTipsまで幅広く取り扱っています。

HIRO's.NET RSSHIRO's.NET RSS


VB.NET 2005の開発でお困りのことはありませんか?
そんな悩みは当サイトで解決!!

HOME > VB.NET 2005 Tips > コントロール > FontDialog Tips メニュー

03.縦書きフォントの表示/非表示を行う

UPDATE:2007/06/05 

<< 前のTips  次のTips >>

 

 フォントダイアログのフォント名一覧に縦書きフォント(先頭に@がついたフォント)を表示できるようにするには、AllowVerticalFontsFontsプロパティにTrueを指定します。(規定値はTrue) 縦書きフォントを表示しない場合はFalseを指定します。


AllorVerticalFonts=True


AllorVerticalFonts=False

 
サンプル
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    'フォント名一覧に縦書きフォントを表示する()
    FontDialog1.AllowVerticalFonts = True

    'フォントダイアログを表示
    If FontDialog1.ShowDialog = DialogResult.OK Then
        '選択されたフォントをテキストボックスに設定
        TextBox1.Font = FontDialog1.Font()
    End If
End Sub