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

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 运筹学排序问题中的在线排序
  • ¥15 关于docker部署flink集成hadoop的yarn,请教个问题 flink启动yarn-session.sh连不上hadoop,这个整了好几天一直不行,求帮忙看一下怎么解决
  • ¥30 求一段fortran代码用IVF编译运行的结果
  • ¥15 深度学习根据CNN网络模型,搭建BP模型并训练MNIST数据集
  • ¥15 C++ 头文件/宏冲突问题解决
  • ¥15 用comsol模拟大气湍流通过底部加热(温度不同)的腔体
  • ¥50 安卓adb backup备份子用户应用数据失败
  • ¥20 有人能用聚类分析帮我分析一下文本内容嘛
  • ¥30 python代码,帮调试,帮帮忙吧
  • ¥15 #MATLAB仿真#车辆换道路径规划