注册 登录
编程论坛 VB.NET论坛

VB.NET高手请指教呀!

一丁37 发布于 2010-04-21 23:25, 552 次点击
源码如下:
Imports System.Drawing
Public Class Form1
    Dim g As Graphics = Me.CreateGraphics
    Private Sub Form1_Shown(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Shown
        Dim mypen As Pen = New Pen(Color.Black, 2)
        g.DrawEllipse(mypen, 50, 50, 300, 200)

    End Sub
End Class
在我的电脑上只显示出大半个椭圆,只要是X大于300就显示不出完整的图形,如下面的语句
        g.DrawLine(mypen, 50, 50, 400, 50)
        g.DrawLine(mypen, 50, 250, 300, 250)
绘出的直线一样长,为什么?我试了多次,只要X大于300就显示不出。
5 回复
#2
cnfarer2010-04-22 06:48
将form尺寸设大点
#3
czyzhuo2010-04-22 11:33
要计算一下这些椭圆的短半径、长半径之间的关系,这些数值关乎到是否能组成 一个椭圆
#4
一丁372010-04-22 14:56
回复 2楼 cnfarer
好像跟FORM大小没关系,设的很大,效果一样。
#5
ouxianzhi5202010-04-23 09:31
和form的大小有关系吧。小了就不能显示完,还有你的椭圆的起点位置
#6
一丁372010-04-25 20:26
问题没解决!!!有办法者请指教。
1