XY散点图公式

Question

Excel有个功能，选中两列数据，可以生成XY散点图。现在VB中输入数据，生成XY散点图，dim  a(1 to 5,1 to  2)
a(1,1)=val(text1)
a(2,1)=val(text3)
a(3,1)=val(text5)
a(4,1)=val(text7)
a(5,1)=val(text9)
a(1,2)=val(text2)
a(2,2)=val(text4)
a(3,2)=val(text6)
a(4,2)=val(text8)
a(5,2)=val(text10)
MSChart1.ChartData = a
MSChart1.chartType = VtChChartType2dXY根据上面的方法，可以画出散点图，但是我找了半天找不到公式和显示R平方的属性的地方，在Excel里，生成XY散点图后，将散点图的“曲线预测”设为“线性”，Excel可以非常方便的给出散点图的方程和R方。VB画出散点图后，可以给出方程吗（线性关系，也就是y=ax+b）？如果可以的话不用MSChart1控件实现的也行。excel

Answer 1

mschart的界面没有excel画出来的好看，正在考虑根据自己计算的画图。