MSChart , 1 вопрос

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
KPEATOP
Бывалый
Бывалый
 
Сообщения: 291
Зарегистрирован: 02.12.2002 (Пн) 16:33
Откуда: Russia

MSChart , 1 вопрос

Сообщение KPEATOP » 02.05.2007 (Ср) 14:48

Подскажите, кто знает, как добавить в MSChart второй ряд с количеством точек меньшим , чем у первого ряда ?
У меня есть один ряд в MSChart (например 10 точек). Мне надо добавить второй ряд с двумя точками (прямая линия).
Когда сам пробовал, у меня получается, что можно добавлять ряды только с таким же количеством точек, что у первого.
Заранее сенкс.

Подскажите, кто знает, как в MSChart можно нажатием на кнопку мыши по какой-нибудь точке и передвижением мыши передвинуть эту точку в другое место на графике ?
Заранее сенкс!
Вечность пахнет нефтью

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 02.05.2007 (Ср) 15:14

Нефиг вопросы на одну тему (тем более такого уровня) разбивать на два топика.

Вместо отсутствующих точек (RTFM) надо ставить Null.
Нажатие мыши (RTFM) обрабатывается событием MouseMove, в котором надо менять ChartData.
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

KPEATOP
Бывалый
Бывалый
 
Сообщения: 291
Зарегистрирован: 02.12.2002 (Пн) 16:33
Откуда: Russia

Сообщение KPEATOP » 03.05.2007 (Чт) 7:48

В первом ряду у меня 22 точки. Хочу добавить второй ряд с двумя точками (прямую).
Не получилось у меня поставить Null. Пишет ошибку Invalid use of Null

With Form3.MSChart1
.ColumnCount = 4
.RowCount = kol

For i = 1 To kol
If i = 1 Then
.Column = 3
.ROW = i
.Data = 2.5
.Column = 4
.ROW = i
.Data = 3.7
ElseIf i = 2 Then
.Column = 3
.ROW = i
.Data = 4.5
.Column = 4
.ROW = i
.Data = 5.1
Else
.Column = 3
.ROW = i
.Data = Null
.Column = 4
.ROW = i
.Data = Null
End If
Next i
End With


И на счет второго вопроса про перемещение точки: не пойму как мне схватить нужную точку и переместить, можно поподробнее, плизз.
Пожалуйста, помогите. Заранее сенкс !
Вечность пахнет нефтью

Konst_One
Член-корреспондент академии VBStreets
Член-корреспондент академии VBStreets
Аватара пользователя
 
Сообщения: 3041
Зарегистрирован: 09.04.2004 (Пт) 13:47
Откуда: Химки

Сообщение Konst_One » 03.05.2007 (Чт) 11:22

вот делал что-то подобное давно:
Вложения
MyGraph.rar
(35.75 Кб) Скачиваний: 92

KPEATOP
Бывалый
Бывалый
 
Сообщения: 291
Зарегистрирован: 02.12.2002 (Пн) 16:33
Откуда: Russia

Сообщение KPEATOP » 03.05.2007 (Чт) 11:56

У меня эти исходники не загружаются. Может разные версии VB ? У меня VB 5.0
Может кто нибудь подскажет ответы на мои вопросы. Очень нужно. Плиззз.
Вечность пахнет нефтью


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: Yandex-бот и гости: 20

    TopList