1:
2:
3:
4:
5:
6:
7:
|
" codeBody "
van Private Sub (ByVal afzender als Voorwerp, ByVal e als System.Windows.Forms.PaintEventArgs) Handvatten Form1_Paint Me.Paint
'e.Graphics.DrawLine (Pens.Red, 0, 0, 858, 514)
e.Graphics.RotateTransform (180)
e.Graphics.DrawString („Aantal Transacties“, Nieuwe System.Drawing.Font („Serif van Microsoft San“, 15, FontStyle.Regular), Brushes.Black, 400, 250)
'e.Graphics.DrawLine (Pens.Green, 0, 504, 857, 0)
e.Graphics.DrawString („Tijd van Dag“, Nieuwe System.Drawing.Font („Serif van Microsoft San“, 15, FontStyle.Regular), Brushes.Black, 400, 250)
Sub van het eind
|