Visual Basic 中学校 掲示板 投稿内容
タグのない投稿を抽出 統計 RSS

Visual Basic 中学校 > 投稿一覧 >

文字を横に広げ 斜めに回転する方法

タグの編集...

投稿者 ひでと   (社会人)   投稿日時 2016/12/27 12:59:03
お世話になります。
Visual Studio 2005を使用しています。

PictureBoxに 文字列を書くプログラムを作成しています。
通常のフォントを横に2倍に引きのばし、さらに30度の角度で表示したいと思います。
いくつかのサイトを見ながら処理を作ってみたのですが、文字が横に引き伸ばされるときに、
斜めに引き伸ばされてしまいます。
文字自体は横に太った文字にしたいのですが、どう変更すればよいのでしょうか?
 
    Public Sub Draw(ByVal sender As ObjectByVal e As System.Windows.Forms.PaintEventArgs)
        Dim fnt As New Font("MS UI Gothic", 20)
        e.Graphics.TranslateTransform(19, 143)
        e.Graphics.ScaleTransform(2, 1)
        e.Graphics.RotateTransform(-30)
        '文字列を位置(19,143)白で表示 
        e.Graphics.DrawString(word, fnt, Brushes.White, 0, 0)
        'リソースを解放する() 
        fnt.Dispose()
    End Sub

 

投稿者 魔界の仮面弁士   (社会人)   投稿日時 2016/12/27 15:08:50
RotateTransform と ScaleTransform の適用順序を逆にしてみるとか。

投稿者 ひでと   (社会人)   投稿日時 2016/12/28 13:15:54
ありがとうございます。
あっ 順番が違っていたんですね。
うまくいきました、ありがとう御座いました。