Объявление безразмерного массива

@Glova · Регистрация: 11.11.2011

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

Здравствуйте! Всех с Наступившим и наступающим Рождеством!

Мне очень срочно требуется помощь.

1. Мой учитель информатики задал мне задачу-вопрос, чтобы я решил. Формулируется примерно так: "как сделать массив, если размер не известен"... точно даже не помню как он сказал... но ещё написал мне на листочке.. может это поможет лучше понять, что он от меня хочет

Visual Basic
1
2
3
4
5
6
7
8
pub. sub. mu (Byval n1 as integer)
mas () () as Double
    Array.Resize(mas, n1)
    mas(0)(1...3)
    mas(1)(1...3)
    ...
    mas(n1)(1...3)
    mas(i)(j)=i^2-j

я так понимаю, что он писал всё сокращенно

Кто нибудь знает, как это сделать? Помогите, пожалуйста

2. Как сделать так, чтобы при запуске программы запускалась сначала одна форма, а затем возникала другая. При этом первая будет неактивна для нажатия на неё, а вторая будет держаться (работать) до тех пор, пока на ней не нажмут кнопку, после чего она исчезает, и первая форма работает уже на все 100%? Такое возможно вообще ?)

@Jason · 07.01.2012, 02:20

Так для начала ответ на безразмерный массив вот написал пример:

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Dim List() As String ' Список элементов.
Dim Num As Integer ' Число элементов в списке.
 
Private Sub Command1_Click()
Dim StrList
Num = 0
For i = 1 To 1000 Step 1 'В общем будем записывать 1000 чисел
Num = Num + 1 'К числу элементов +1
ReDim Preserve List(1 To Num) ' Изменить Dim
Randomize 'Генерируем число
List(i) = Fix(Rnd * 10000) ' Тут я думаю не надо объяснять
StrList = StrList + List(i) & vbCrLf 'Записываем число с новой строки
Next
Text1.Text = StrList 'Ну и в тхт1 вписываем все числа
End Sub

Ну и формы 2 вот код для 1 формы:

Visual Basic
1
2
3
4
Private Sub Form_Load()
Form2.Show ' Запускаем Форму2
Form1.Enabled = False ' Делаем неактивным Окно
End Sub

Код для 2 формы:

Visual Basic
1
2
3
4
Private Sub Command1_Click()
Form1.Enabled = True 'Активная 1 форма.
Unload Me ' Закрываем свое же окно (т.е. Форму 2)
End Sub

@Glova · 08.01.2012, 16:34 **[ТС]**

Ага-м, спасибо!

А существуют ещё варианты составления безразмерного массива?
Если да, напишите кто нибудь, пожалуйста )

@Jason · 08.01.2012, 16:49

А зачем еще, этот в полне рабочий.

@Glova · 08.01.2012, 17:40 **[ТС]**

Hennasy, да, я понимаю!) Спасибо большое Вам!

Но может есть ещё варианты? Чтобы и тот, и тот использовать.

Новые блоги и статьи Все статьи Все блоги /
Модульный подход на примере F# DevAlt 06.03.2026 В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .	Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование 8Observer8 05.03.2026 Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .	SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D 8Observer8 04.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .	SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий 8Observer8 02.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip Сканируйте QR-код на мобильном и вы увидите, что появится джойстик для управления главным героем. . . .
Реалии Hrethgir 01.03.2026 Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .	Ритм жизни kumehtar 27.02.2026 Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .	SDL3 для Web (WebAssembly): Сборка библиотек: SDL3, Box2D, FreeType, SDL3_ttf, SDL3_mixer и SDL3_image из исходников с помощью CMake и Emscripten 8Observer8 27.02.2026 Недавно вышла версия 3. 4. 2 библиотеки SDL3. На странице официальной релиза доступны исходники, готовые DLL (для x86, x64, arm64), а также библиотеки для разработки под Android, MinGW и Visual Studio. . . .	SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами 8Observer8 20.02.2026 Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .

@Glova 0 / 0 / 0 Регистрация: 11.11.2011 Сообщений: 45
	08.01.2012, 16:34 [ТС]
	Ага-м, спасибо! А существуют ещё варианты составления безразмерного массива? Если да, напишите кто нибудь, пожалуйста ) 0

@Jason 525 / 487 / 99 Регистрация: 25.12.2011 Сообщений: 1,176
	08.01.2012, 16:49
	А зачем еще, этот в полне рабочий. 0

@Glova 0 / 0 / 0 Регистрация: 11.11.2011 Сообщений: 45
	08.01.2012, 17:40 [ТС]
	Hennasy, да, я понимаю!) Спасибо большое Вам! Но может есть ещё варианты? Чтобы и тот, и тот использовать. 0