vb.net 教程 5-12 绘图实例之统计图 2 折线图

版权声明：本文为博主原创文章，转载请在显著位置标明本文出处以及作者网名，未经作者允许不得用于商业目的。
继续上一期《绘图实例之统计图1》，继续讲解如何绘制折线图：

当按下“折线图”按钮时，调用三个函数，分别是绘制坐标轴、绘制折线、显示到窗口：

    Private Sub btnLineChart_Click(sender As Object, e As EventArgs) Handles btnLineChart.ClickCall DrawAxis()Call DrawLine()Call DrawToForm()End Sub

DrawAxis()和DrawToForm()在上一期中已经介绍，以下是DrawLine的代码：

    '绘制折线Private Sub DrawLine()'标注每个季度Dim seasonValue(3) As IntegerseasonValue(0) = nudSeason1.ValueseasonValue(1) = nudSeason2.ValueseasonValue(2) = nudSeason3.ValueseasonValue(3) = nudSeason4.ValueDim seasonName() As String = {"一季度", "二季度", "三季度", "四季度"}'先要获得每个值所在的坐标点'为了显眼，绘制点的显示为一个直径为8的蓝色圆形Dim signX, signY As Integer'将每个坐标点存入数组，画折线时候需要Dim pointSign() As PointReDim pointSign(3)For i As Integer = 0 To 3signX = (i + 1) * 80'不要忘了比例1：3--http://blog.csdn.net/uruseibestsignY = 320 - seasonValue(i) * 3pointSign(i) = New Point(signX, signY)'请注意画园时候的Rectangle位置g.FillEllipse(New SolidBrush(Color.Blue), New Rectangle(signX - 4, signY - 4, 8, 8))Next'使用红色画折线Dim penSign As New Pen(Color.Red, 2)'将四个坐标点连接起来，注意画的是三条线For i As Integer = 0 To 2g.DrawLine(penSign, pointSign(i), pointSign(i + 1))Next'标出每个季度Dim strX, strY As IntegerFor i As Integer = 0 To 3strX = (i + 1) * 80 - 15strY = 325g.DrawString(seasonName(i), New Font("黑体", 10), New SolidBrush(Color.Blue), New Point(strX, strY))NextEnd Sub

按下“折线图”按钮时，如下图所示：

最后强调一下关于绘制矩形、圆形等时候需要注意的起点位置：

由于.net平台下C#和vb.NET很相似，本文也可以为C#爱好者提供参考。

学习更多vb.net知识，请参看 vb.net 教程目录

vb.net 教程 5-12 绘图实例之统计图 2 折线图相关推荐

vb.net 教程 5-12 绘图实例之统计图 3 饼图
版权声明:本文为博主原创文章,转载请在显著位置标明本文出处以及作者网名,未经作者允许不得用于商业目的. 继续上一期<绘图实例之统计图2>,继续讲解如何绘制饼图: 当按下"饼图&q ...
vb.net 教程 5-12 绘图实例之统计图4
版权声明:本文为博主原创文章,转载请在显著位置标明本文出处以及作者网名,未经作者允许不得用于商业目的. 窗体上我们设置了4个按钮,还有一个就是将绘制的统计图保存下来: Private Sub btnS ...
vb.net 教程 5-12 绘图实例之统计图1
版权声明:本文为博主原创文章,转载请在显著位置标明本文出处以及作者网名,未经作者允许不得用于商业目的. 前面几篇介绍了如何使用graphics绘制图像,这几篇准备介绍如何使用graphics提供的方法 ...
vb.net 教程 5-12 绘图实例之统计图 1 柱状图
版权声明:本文为博主原创文章,转载请在显著位置标明本文出处以及作者网名,未经作者允许不得用于商业目的. 前面几篇介绍了如何使用graphics绘制图像,这几篇准备介绍如何使用graphics提供的方法 ...
matplotlib常见绘图基础代码小结：折线图、散点图、条形图、直方图、饼图
一.折线图二.散点图三.条形图四.直方图五.饼图一.折线图折线图用于显示随时间或有序类别的变化趋势 from matplotlib import pyplot as pltx = rang ...
Echarts3实例双Y轴折线图
实现效果知识点双Y轴:yAxisIndex Y轴垂直标题调整左侧Y轴刻度代码实现 option = {title: {text: '2018年管线数据利用统计',top:10,left:10} ...
matlab 折线图_MATLAB作图实例：13：折线图和条形图的双轴图
折线图和条形图的双轴图Combine Line and Bar Charts Using Two y-Axes 本示例说明如何使用绘制折线图和条形图的双周图.它还显示了如何自定义线条和条形图. 使用创 ...
echarts教程（三）：配置多条折线图
多条折线非常简单,只需要在series中写多个元素,并都指定type为line即可 option = {xAxis: {type: 'category',data: ['Mon', 'Tue', 'W ...
FusionCharts入门教程：缩放折线图
FusionCharts Suite XT是全面的跨平台.跨浏览器JavaScript图表套包,其中包括FusionCharts XT.PowerCharts XT .FusionWidgets XT ...

vb.net 教程 5-12 绘图实例之统计图 2 折线图

vb.net 教程 5-12 绘图实例之统计图 2 折线图相关推荐

最新文章

热门文章