origin画box chart

你只需要更新图例就行了。方法是：

在坐标轴范围内的空白处点击鼠标右键 注意！ 一定是坐标轴范围内的空白处，不是坐标轴范围外的空白处，Origin在不同位置点击鼠标右键，d出的菜单内容是不同的，一定要注意！

在d出的菜单中选择 New Legend

如何在pictureBox中绘制如下图形,j解答如下

利用Graphic类就可以绘制相应的点，线，面了

Graphic g=pictureboxCreateGraphics();

然后利用g的相应方法就能绘制图形了，如DrawLine画线，DrawRectangle画四边形等

用鼠标拖着画矩形
Dim Cx0, Cy0
Private Sub Picture1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 1 Then
Cx0 = X
Cy0 = Y
End If
End Sub
Private Sub Picture1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
Picture1Line (Cx0, Cy0)-(X, Y), , B
End Sub

Sub Form_Click()
Dim CX, CY, Radius, Limit ' Declare variable
Picture1AutoRedraw = True
Picture1ScaleMode = 3 ' 以像素为单位。
CX = Picture1ScaleWidth / 2 ' X 位置。
CY = Picture1ScaleHeight / 2 ' Y 位置。
If CX > CY Then Limit = CY Else Limit = CX
For Radius = 0 To Limit ' 半径。
Picture1Circle (CX, CY), Radius, RGB(Rnd 255, Rnd 255, Rnd 255)
Next Radius
For I = 0 To 50 Step 2 ' Set up loop
F = I / 50 ' 执行中间。
f1 = 1 - F: f2 = 1 + F ' 计算。
Picture1Line (CX f1, CY)-(CX, CY f1) ' 画左上角。
Picture1Line -(CX f2, CY) ' 画右上角。
Picture1Line -(CX, CY f2) ' 画右下角。
Picture1Line -(CX f1, CY) ' 画左下角
ForeColor = QBColor(I Mod 15) ' 每次改变颜色。
Next I
SavePicture Picture1Image, "z:\testbmp"
End Sub

箱线图（Boxplot）也称箱须图（Box-whisker Plot），是利用数据中的五个统计量：最小值、第一四分位数、中位数、第三四分位数与最大值来描述数据的一种方法，它也可以粗略地看出数据是否具有有对称性，分布的分散程度等信息，特别可以用于对几个样本的比较。

箱线图的绘制步骤:

（1）画数轴

（2）画矩形盒 两端边的位置分别对应数据的上下四分位数矩形盒：端边的位置分别对应数据的上下四分位数（Q1和Q3）。在矩形盒内部中位数位置画一条线段为中位线。

（3）在Q3＋15IQR（四分位距）和Q1-15IQR处画两条与中位线一样的线段，这两条线段为异常值截断点，称其为内限；在 Q3＋3IQR和Q1－3IQR处画两条线段，称其为外限。处于内限以外位置的点表示的数据都是异常值，其中在内限与外限之间的异常值为温和的异常值 （mild outliers），在外限以外的为极端的异常值(li)的异常值extreme outliers。

（4）从矩形盒两端边向外各画一条线段直到不是异常值的最远点 表示该批数据正常值的分布区间点，示该批数据正常值的分布区间。

（5）用“〇”标出温和的异常值，用“＊”标出极端的异常值。

（统计软件绘制的箱线图一般没有标出内限和外限。）

    

    

绘图是系统内部 *** 作的，不需要懂原理
方法就在那里，只有会用和不会用，你的代码告诉它绘制，它就会绘制。它（方法）究竟如何去绘制的并不是重点，反正它会绘制。
drawline（绘线）方法很简单，第一个参数是pen,它确定线条的颜色、宽度和样式。第二、第三个参数都是point类型，确定两个点的位置，绘制直线。

---