Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - .NET

Страница: 1 |

 

  Вопрос: Работа с Microsoft Charts Добавлено: 06.12.09 23:31  

Автор вопроса:  turBO | Web-сайт: blitz3d.at.ua | ICQ: 451232820 
Необходим компонент для работы с графиками и диаграммами. В VB.NET я пока чайник.
Скачал и поставил Microsoft Charts под Framework 3.5, добавил либы через Add Reference. Вписал следующий код
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim lstDouble As New List(Of Double)
        lstDouble.AddRange(New Double() {123456, 234567, 345678, 456789})

        With Chart1.Series(0)
            .Points.DataBindY(lstDouble)
            .IsValueShownAsLabel = True
            .LabelFormat = "#,###"
            .LabelBackColor = Color.LightCyan
        End With

        Chart1.ChartAreas(0).AxisY.LabelStyle.Format = "#,###"

Выводится следующее сообщение "Chart1 is not declared". Простите за глупость, но что нужно прописать?

Ответить

  Ответы Всего ответов: 3  

Номер ответа: 1
Автор ответа:
 maza_____



ICQ: 9968842 

Вопросов: 40
Ответов: 337
 Web-сайт: vkontakte.ru/id25563295 добавляйтесь в друзья))
 Профиль | | #1
Добавлено: 07.12.09 11:40
"Chart1 is not declared".

Написано же Chart1 не был обьявлен..

Ответить

Номер ответа: 2
Автор ответа:
 turBO



ICQ: 451232820 

Вопросов: 9
Ответов: 13
 Web-сайт: blitz3d.at.ua
 Профиль | | #2
Добавлено: 07.12.09 21:11
Так этого то я и не знаю... как объявить?
Вот весь код:

Imports System.Drawing
Imports System.Windows.Forms
Imports System.Windows
Imports System.Drawing.Graphics
imports System


Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim lstDouble As New List(Of Double)
        lstDouble.AddRange(New Double() {123456, 234567, 345678, 456789})

        With Chart1.Series(0)
            .Points.DataBindY(lstDouble)
            .IsValueShownAsLabel = True
            .LabelFormat = "#,###"
            .LabelBackColor = Color.LightCyan
        End With

        Chart1.ChartAreas(0).AxisY.LabelStyle.Format = "#,###"
    End Sub

End Class


Чего не хватает?

Ответить

Номер ответа: 3
Автор ответа:
 turBO



ICQ: 451232820 

Вопросов: 9
Ответов: 13
 Web-сайт: blitz3d.at.ua
 Профиль | | #3
Добавлено: 07.12.09 22:52
Компонент установлен, но через Add Reference не виден. Не появился на Toolboxe. Может он "не дружит" с Visual Sudio 2005 ?

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам