|
■No79396 (shu さん) に返信
Graphicsを取得して自分で描画する例:
Private Sub Label1_Paint(sender As Object, e As System.Windows.Forms.PaintEventArgs) Handles Label1.Paint
Dim g = e.Graphics
Using fnt = New Font("MS ゴシック", 10.5!, FontStyle.Regular)
g.DrawString("c", fnt, Brushes.Black, 50, 0)
g.DrawString("a + b - ", fnt, Brushes.Black, 0, 10)
g.DrawString("d", fnt, Brushes.Black, 50, 20)
g.DrawLine(Pens.Black, 50, 20, 60, 20)
End Using
End Sub
実際は数式に合わせて座標や描画要素を変える必要があるかと思います。
|