Dim x, y As Decimal
Dim i As Integer
i = 1
For x = Form1.TextBox2.Text To Form1.TextBox3.Text Step Form1.TextBox4.Text
y = Math.Sin(x) + 1
i = i + 1
Next
Dim arrData(i, 1)
i = 1
For x = Form1.TextBox2.Text To Form1.TextBox3.Text Step Form1.TextBox4.Text
y = Math.Sin(x) + 1
arrData(i, 1) = y
i = i + 1
Next
AxMSChart1.ChartData = arrData
'Add a title and legend.
With Me.AxMSChart1
.Title.Text = "y=sin(x)+1"
End With
Нарисовать график
Есть ли в VB.NET что-то подобное к компоненту TChart в Delphi. Или возможно есть другой путь построения графиков.
Microsoft Chart Control
я пишу
Dim chart1
chart1 = CreateObject("MSChart20Lib.MSChart")
А что дальше?
Добавил это ActiveX элемент в список компонентов, теперь проблема как добавлять точки где можно найти описания функций и методов этого ActiveX элемента
Код:
Вот ссылка где можно почитать http://msdn.microsoft.com/library/rus/default.asp?url=/library/RUS/mschrt/html/vbobjVtChartObject.asp