Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - .NET

Страница: 1 | 2 |

 

  Вопрос: Есть слайдер - ползунок. В нем даны значения от 0 Добавлено: 22.07.10 12:26  

Автор вопроса:  Юрий

Ответить

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

Номер ответа: 16
Автор ответа:
 Юрий



Вопросов: 3
Ответов: 30
 Профиль | | #16 Добавлено: 22.07.10 17:07
Мне нужно что бы старые значения сохранялись, а не затирались текущими данными. Может какие то процедуры для этого есть? Вот как должно быть - информация не теряется а накапливается http://www.7image.ru/pics/0710/52217462.gif

Вот что сейчас http://www.7image.ru/pics/0710/52218223.gif
видно что значения затираются следующими значениями

Ответить

Номер ответа: 17
Автор ответа:
 Artyom



Разработчик

Вопросов: 130
Ответов: 6602
 Профиль | | #17 Добавлено: 22.07.10 18:20
Ну в Dictionary как раз можно накапливать данные

Ответить

Номер ответа: 18
Автор ответа:
 Юрий



Вопросов: 3
Ответов: 30
 Профиль | | #18 Добавлено: 22.07.10 18:22
А как это сделать, если после выхода из процедуры переменные теряют свои значения?

Ответить

Номер ответа: 19
Автор ответа:
 Юрий



Вопросов: 3
Ответов: 30
 Профиль | | #19 Добавлено: 22.07.10 18:26
Может нужно сделать какой то цикл, которые подхватывает и передает значение в массив? Гуглил, ни одно похожего примера не нашел вашпе

Ответить

Номер ответа: 20
Автор ответа:
 s12



Вопросов: 24
Ответов: 363
 Профиль | | #20 Добавлено: 22.07.10 22:30
Юрий
О снова точки. Все мучаемся. Почему-то мне кажется что задача не очень сложная. Юрий выложите тех. задание, или отправте мне на мыло, у меня завтра будет часа 3-4 свободных, я посмотрю. До Артема мне, конечно, далеко, но кое-что тоже могу.

Ответить

Номер ответа: 21
Автор ответа:
 Юрий



Вопросов: 3
Ответов: 30
 Профиль | | #21 Добавлено: 23.07.10 11:55
Во общем никакого тех задания нет, все что мог написал в этом топике. Тут видимо дело в том что я оперирую функцией как черным ящиком - известны только ее значения. В программировании не должно возникать таких моментов, Артем показал очевидную вещь
# Dim data As New Dictionary (Of Integer, Integer)
#
# For I = 0 To 100
# data(I) = MyFunction (I)
# Next I
Нужно просто разложить MyFunction(i) и засунуть в цикл от общего параметра (i). Видимо та идея которую я пытался до нести нестандартна и не используется программистами )))

Ответить

Номер ответа: 22
Автор ответа:
 Artyom



Разработчик

Вопросов: 130
Ответов: 6602
 Профиль | | #22 Добавлено: 23.07.10 13:39
Юрий пишет:
А как это сделать, если после выхода из процедуры переменные теряют свои значения?

Делаешь этот Dictionary глобальным, я ж писал в другом топике уже. И значения будут накапливаться

Ответить

Номер ответа: 23
Автор ответа:
 Юрий



Вопросов: 3
Ответов: 30
 Профиль | | #23 Добавлено: 27.07.10 12:39
Глобально объявить вот так нужно?
Public Class IntializableDictionary
    Inherits Dictionary(Of Int32, String)

Ответить

Номер ответа: 24
Автор ответа:
 AgentFire



ICQ: 192496851 

Вопросов: 75
Ответов: 3178
 Профиль | | #24 Добавлено: 27.07.10 14:07
public module

Ответить

Номер ответа: 25
Автор ответа:
 Artyom



Разработчик

Вопросов: 130
Ответов: 6602
 Профиль | | #25 Добавлено: 27.07.10 14:30
  1. Public Class Hel
  2.     Public Shaed MyDictionary As New Dictionary (Of Integer, String)


Почему String взял если у тебя были чилсовые значения?

Ответить

Номер ответа: 26
Автор ответа:
 Юрий



Вопросов: 3
Ответов: 30
 Профиль | | #26 Добавлено: 27.07.10 14:55
"Почему String взял если у тебя были чилсовые значения" Я хз, иначе ошибку дает. Там же не только числа могут быть, буквы например. В общем ничего не поменялось. Public я засунул после процедуры внизу, иначе никак нельзя, смотри скрин: http://www.7image.ru/v.php?id=53444

Накопления не происходит. Связать функцию со счетчиком я не смог.

Private Sub RunScript(ByVal x As Integer, ByVal y As Integer, ByRef A As Object)
    ;Dim dictionary As New Dictionary(Of String, Integer)
    ' y - текущее значение слайдера, x - соотвествующи значению слайдера номер
    dictionary.Add(y, x)
    ;Dim pair As KeyValuePair(Of String, Integer)
    For Each pair In dictionary
      ' получаем пару чисел, задача получить список пар для всех значений слайдера
      Print("{0}, {1}", pair.Key, pair.Value)
      A = dictionary
    Next pair
  End Sub

  '<Custom additional code>
  Public Class Hel
    Public Shared dictionary As New Dictionary (Of String, Integer)
  End Class


А что если сделать что то вроде лога, только дату не печатать, см. гифку http://www.7image.ru/v.php?id=53447

Ответить

Номер ответа: 27
Автор ответа:
 Artyom



Разработчик

Вопросов: 130
Ответов: 6602
 Профиль | | #27 Добавлено: 27.07.10 18:27
Во-первых у тебя каша с типами - в Dictionary (Of String, Integer) ты добавшяешь два Integer'а.
Во-вторых, зачем нужен аргумент A As Object? Во-первых, там нужен не Object, во-вторых, он вообще не нужен.

В-третьих, ты не используешь глобальный словарь. Доступ к нему происходит через Hel.dictionary, та же в методе каждый раз создашеь новый Dictionary, и в него добавляшеь данные.

Ответить

Страница: 1 | 2 |

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



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