Бесконечный массив Dim myStr(0 To Num)

25.09.2007, 20:38. **Показов** 1756. **Ответов** 5

Студворк — интернет-сервис помощи студентам

Например: Dim myStr(0 To Num). Как сделать чтоб вместо Num сояло бесконечное число?

25.09.2007, 22:01

dim a ( 0 to oo)

бесконечный массив требует бесконечной памяти и я думаю у Вас на нее денег не хватит

может поможет:

Visual Basic
1
2
3
dim a()
redim a(2)
redim preserve a(45)

@Extremity · 25.09.2007, 23:58

А зачем бесконечное ?

Любой тип данных имеет свуой размер в памяти.
Конечно VB не дает тебе управление этой самой памятью, но при помощи API работать с таковой можно.

Суть не в этом.

Если допутим ты имеешь матрицу (массив) данных
и тебя тревожит вопрос размерности этих данных, то
целесобразней увеличивать масив.

Так например если, ты создаешь одномерную матрицу
в которой собираешься хранить допутим файл. То возникает вопрос, какой размер у файла ?

Теперь ты можешь воспользоваться формальным выражением в VB и переопределить размер матрицы.

Делается это так:

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
Dim szFile as long    '// Size of file
Dim fMatrix() as byte '// File data matrix
                      '// Узнаем размер файла
szFile=filelen('c:  est.exe')
 
'// и перед чтением файла в масив переопределяем
'// размер массива в соответствии с файлом.
 
Redim fMatrix(0 To szFile)
'// Теперь размер матрицы такойже как и размер
'// файла.

P.S. - Ну даже если теоритический допустить
что возможно было-бы, создать массив
бесконечной длинны, то возникает масса
вопросов, первый из которых заключается
в том, как считать данные из такого масива
ведь он бесконечный ! А значит считывать
мы будем бесконечно !

С наилутьшими пожеланиями
Extremity

26.09.2007, 04:33

А почему не получается вставить переменную?
Допустим происходят вычисления и в переменную intA = присваевается значение. А когда я делаю так: Dim fn(0 To intA) происходит ошибка: 'Требуется выражение-константа'. Что я делаю неправильно?

@Extremity · 27.09.2007, 12:15

Все очень просто ...

Когда ты пишишь допустим.

Dim A(0 to Atl)as long

То в процессе компиляции, компилятор ищет Atl,
Значение которого на самом деле будет высчитываться.По этой самой причине ты не можешь
В Выражении присвоить сразу Atl.
Но !

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

Если же ты всетаки знаешь заранее массив, то тебе нужно его обьявить одним из следуующих формальных выражениях:

Visual Basic
1
Dim A(0 To 100) as long

или так...

Visual Basic
1
2
Private Const ATL as long=100
Dim A(0 To 100) as Long

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

Приятного программинга
Stan

27.09.2007, 17:18

Спасибо!

Новые блоги и статьи Все статьи Все блоги /
моя боль iceja 24.01.2026 Выложила интерполяцию кубическими сплайнами www. iceja. net REST сервисы временно не работают, только через Web. Написала за 56 рабочих часов этот сайт с нуля. При помощи perplexity. ai PRO , при. . .	Модель сукцессии микоризы anaschu 24.01.2026 Решили писать научную статью с неким РОманом	http://iceja.net/ математические сервисы iceja 20.01.2026 Обновила свой сайт http:/ / iceja. net/ , приделала Fast Fourier Transform экстраполяцию сигналов. Однако предсказывает далеко не каждый сигнал (см ограничения http:/ / iceja. net/ fourier/ docs ). Также. . .	http://iceja.net/ сервер решения полиномов iceja 18.01.2026 Выкатила http:/ / iceja. net/ сервер решения полиномов (находит действительные корни полиномов методом Штурма). На сайте документация по API, но скажу прямо VPS слабенький и 200 000 полиномов. . .
Расчёт переходных процессов в цепи постоянного тока igorrr37 16.01.2026 / * Дана цепь(не выше 3-го порядка) постоянного тока с элементами R, L, C, k(ключ), U, E, J. Программа находит переходные токи и напряжения на элементах схемы классическим методом(1 и 2 з-ны. . .	Восстановить юзерскрипты Greasemonkey из бэкапа браузера damix 15.01.2026 Если восстановить из бэкапа профиль Firefox после переустановки винды, то список юзерскриптов в Greasemonkey будет пустым. Но восстановить их можно так. Для этого понадобится консольная утилита. . .	Сукцессия микоризы: основная теория в виде двух уравнений. anaschu 11.01.2026 https:/ / rutube. ru/ video/ 7a537f578d808e67a3c6fd818a44a5c4/	WordPad для Windows 11 Jel 10.01.2026 WordPad для Windows 11 — это приложение, которое восстанавливает классический текстовый редактор WordPad в операционной системе Windows 11. После того как Microsoft исключила WordPad из. . .

S1D

	Бесконечный массив Dim myStr(0 To Num) 25.09.2007, 20:38. Показов 1756. Ответов 5 Метки нет (Все метки) Например: Dim myStr(0 To Num). Как сделать чтоб вместо Num сояло бесконечное число?

S1D
	26.09.2007, 04:33
	А почему не получается вставить переменную? Допустим происходят вычисления и в переменную intA = присваевается значение. А когда я делаю так: Dim fn(0 To intA) происходит ошибка: 'Требуется выражение-константа'. Что я делаю неправильно?

S1D
	27.09.2007, 17:18
	Спасибо!