Pirate scholar 2017-09-22 05:37 采纳率: 22.2%
浏览 1561
已采纳

C#/vb.net 在picturebox中的画图

C#/vb.net 在picturebox中的画图函数button_click 可以触发,form load不可触发

 Dim MyFormGraphic As Graphics = FormPic.CreateGraphics
        Dim BlackPen As New Pen(Brushes.Black, 2)  '线宽为2 
        Dim x As Integer
        Dim y As Integer
        Dim width As Integer = Piewidth
        Dim height As Integer = Pieheight
        x = (PicBoxWidth - width) / 2    '目前没用
        y = (PicBoxHeight - height) / 2    '计算距离轴起点纵坐标
        Dim StrF As New StringFormat()
        StrF.FormatFlags = StringFormatFlags.DirectionVertical
        MyFormGraphic.DrawString("( 范 围 Km )", New Font("Verdana", 10), Brushes.Blue, 10, 180, StrF)
        For i = 0 To 10 Step 2
            '画距离标尺   上半轴
            Dim startb As New PointF(40, y + height / 2 - i * PicR / 10 - 10)
            MyFormGraphic.DrawString(Convert.ToString(i * PerDis + DisMin), New Font("Verdana", 10), Brushes.Blue, startb)
            '画距离刻度
            Dim start2b As New PointF(80, y + i * PicR / 10)
            Dim end2b As New PointF(89, y + i * PicR / 10)
            MyFormGraphic.DrawLine(BlackPen, start2b, end2b)     '画长刻度
            Dim start2bb As New PointF(84, y + i * PicR / 10 + PicR / 10)
            Dim end2bb As New PointF(89, y + i * PicR / 10 + PicR / 10)
            MyFormGraphic.DrawLine(BlackPen, start2bb, end2bb)     '画短刻度
        Next i

这是什么原因

  • 写回答

1条回答

  • mkq229 2017-09-22 07:58
    关注

    页面还没加载完 可以在paint事件中画

    本回答被题主选为最佳回答 , 对您是否有帮助呢?
    评论

报告相同问题?

悬赏问题

  • ¥15 DIFY API Endpoint 问题。
  • ¥20 sub地址DHCP问题
  • ¥15 delta降尺度计算的一些细节,有偿
  • ¥15 Arduino红外遥控代码有问题
  • ¥15 数值计算离散正交多项式
  • ¥30 数值计算均差系数编程
  • ¥15 redis-full-check比较 两个集群的数据出错
  • ¥15 Matlab编程问题
  • ¥15 训练的多模态特征融合模型准确度很低怎么办
  • ¥15 kylin启动报错log4j类冲突