高手请进：怎么用vb实现k线图，最好不是用控件的

在picturebox控件中使用早樱画图祥睁租得语句

Picture1.Line (x1,y1)-(x2,y2), QBColor(2)

QBColor(2)代表颜色，可以修谨兆改

With TChart1.Series(0).asCandle

.AddCandle DateValue("2/11/缺岩97"), 120, 135, 112, 115

.AddCandle DateValue("3/11/97"), 115, 125, 102, 121

End With

或者

TChart1.Series(0).asCandle.AddCandle DateValue("2/11/郑升97"喊扮老), 120, 135, 112, 115

TChart1.Series(0).asCandle.AddCandle DateValue("2/12/97"), 115, 125, 102, 121

我说一个例子

ctrl+t 引用厅山念唯旅 D:\WIN2K\System32\MSCHRT20.OCX **部件扮困**

Private Sub Command1_Click()

With MSChart1

.chartType = VtChChartType2dLine

.ColumnCount = 8

.RowCount = 8

.ShowLegend = True

.SelectPart VtChPartTypePlot, index1, index2, _

index3, index4

.EditCopy

.SelectPart VtChPartTypeLegend, index1, _

index2, index3, index4

.EditPaste

End With

End Sub

---