我想在vb.net里画一个直角坐标，不知道怎么画，请各位大虾指教，不胜感激！！

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim g As Graphics
Dim p As New Pen(Color.Blue, 4)
p.SetLineCap(Drawing2D.LineCap.Round, Drawing2D.LineCap.ArrowAnchor, Drawing2D.DashCap.Round)
g = Me.CreateGraphics

g.TranslateTransform(10, 10)
g.DrawLine(p, 0, 0, CInt(Me.Width * 0.8), 0)
g.DrawLine(p, 0, 0, 0, CInt(Me.Height * 0.8))

g.Dispose()
End Sub