Компьютерный форум
Правила
Вернуться   Компьютерный форум > Форум программистов > Программирование под Windows > Visual Basic
Перезагрузить страницу Можно задавать элементы массива в виде диапазона?
Ответ
 
Опции темы Опции просмотра
  (#1 (permalink)) Старый
kminas kminas вне форума
Member
 
Сообщений: 140
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Регистрация: 26.10.2005
По умолчанию Можно задавать элементы массива в виде диапазона? - 26.04.2006, 21:45

Можно ли элементы массива задавать в виде диапазона? Как например, переменную в операторе Select Case
Код:
CASE 1 То 9
или в цикле For... Next
Код:
For n = 1 То 10
Ответить с цитированием
  (#2 (permalink)) Старый
pashulka pashulka вне форума
Member
 
Сообщений: 1,872
Сказал(а) спасибо: 2
Поблагодарили 57 раз(а) в 53 сообщениях
Регистрация: 11.03.2005
По умолчанию 26.04.2006, 22:35

Можно немного подробнее …
Ответить с цитированием
  (#3 (permalink)) Старый
kminas kminas вне форума
Member
 
Сообщений: 140
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Регистрация: 26.10.2005
По умолчанию 26.04.2006, 22:51

Приведу часть массива из моей существующей проги
Код:
Dim a(100) As Integer 
        a(1) = 80 
        a(2) = 100 
        a(3) = 110 
        a(4) = 125 
        a(5) = 140 
        a(6) = 160 
        a(7) = 180 
        a(8) = 200 
        a(9) = 225 
For i = 1 To 8 
If a(i) <= D And D <= a(i + 1) Then 
End If 
Next i
А мне надо, чтобы вместо 80,100,125... был что-нибудь типа 140 to 280, 300 to 450, 400 to 500 и т.д. и чтобы переменная искалась внутри этих диапазонов, причем, в ряде случаев она может подойти к двум диапазонам
Ответить с цитированием
  (#4 (permalink)) Старый
pashulka pashulka вне форума
Member
 
Сообщений: 1,872
Сказал(а) спасибо: 2
Поблагодарили 57 раз(а) в 53 сообщениях
Регистрация: 11.03.2005
По умолчанию 27.04.2006, 00:30

На мой взгляд, только так :

Код:
Dim a(1 To 3, 1 To 2) As Integer

Dim i As Integer
Dim d As Integer
    
a(1, 1) = 140
a(1, 2) = 280
a(2, 1) = 300
a(2, 2) = 450
a(3, 1) = 400
a(3, 2) = 500

For i = 1 To UBound(a)
    If a(i, 1) <= d And d <= a(i, 2) Then
       
    End If
Next
Ответить с цитированием
  (#5 (permalink)) Старый
kminas kminas вне форума
Member
 
Сообщений: 140
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Регистрация: 26.10.2005
По умолчанию 27.04.2006, 23:48

Спасибо за помощь! У Вас как всегда один из самых лаконичных кодов. Буду проверять.
Ответить с цитированием
Ads.
Ads
Ответ

Опции темы
Опции просмотра

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Trackbacks are Вкл.
Pingbacks are Вкл.
Refbacks are Выкл.


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Положительные элементы массива Машa Pascal 1 28.06.2011 17:29
Напечатать элементы массива в виде двух параллельных столбцов imported_Михаил1 Visual Basic 1 05.04.2011 10:41
Как можно сделать чтобы размер матрицы задавать не в файл karakas Lisp 1 14.02.2011 23:17
Как упорядочить элементы массива int по возрастанию Dead_0ff Java 1 09.10.2010 15:09
Заменить элементы одномерного массива Dariya Вопросы начинающих программистов 4 22.09.2010 11:32
Неповторяющиеся элементы массива? NikitaGP Pascal 1 12.07.2007 18:28
Обобщенный класс массива, реалезованный в виде списка элементов Eternity Вопросы начинающих программистов 6 26.05.2007 10:15
Можно ли имя свойства задавать переменной? Serg_14 Visual Basic 11 21.06.2006 21:17
Волновой алгоритм в карте местности в виде массива m*n Tangerine Вопросы начинающих программистов 5 14.05.2006 16:19
Сколько потоков реально можно задавать SanatGA C++ Builder 2 06.01.2006 18:11
Нужно представить bmp файл в виде массива ver-tex Delphi 2 03.03.2005 15:57
Можно ли Range задавать двумя чиленными индексами? yurasv Visual Basic 3 01.11.2004 18:19



Powered by vBulletin® Version 3.8.7
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.
Нardforum.ru - компьютерный форум и программирование, форум программистов