Будь умным!


У вас вопросы?
У нас ответы:) SamZan.ru

Тема- Работа с двумерными массивами

Работа добавлена на сайт samzan.ru: 2016-03-30


абораторная работа № 8

Тема: Работа с двумерными массивами.

Рис. 1 - Форма с выведенными результатами

Текст программы:

Option Explicit

Option Base 1

Dim A() As Single

Dim n As Single, m As Single, i As Single, j As Single

Private Sub Command1_Click()

Print "Исходный массив: "

n = Val(InputBox("Укажите число строк"))

m = Val(InputBox("Укажите число столбцов"))

ReDim A(n, m)

For i = 1 To n

For j = 1 To m

A(i, j) = Val(InputBox("Введите a (" & Str(i) & "," & Str(j) & ") элемент массива"))

Next j

Next i

End Sub

Private Sub Command2_Click()

For i = 1 To n

For j = 1 To m

Print A(i, j);

Next j

Print

Next i

End Sub

Private Sub Command3_Click()

Print "Умноженный массив: "

For i = 1 To n

For j = 1 To m

A(i, j) = A(i, j) * 3

Print A(i, j);

Next j

Print

Next i

End Sub

Private Sub Command4_Click()

End

End Sub

Блок-схема:

Контрольные вопросы:

Дайте определение двумерного массива. Приведите пример его объявления.

До сих пор мы обсуждали только одномерные массивы, представляющие собой “одну строку” переменных. В Visual Basic вы можете создавать и многомерные массивы. Размерность массива будет соответствовать количеству индексов, определяющих местоположение каждого элемента массива. Как правило, программисты не используют массивы, размерность которых больше трех, а для проектов начального уровня обычно достаточно и двумерных массивов.

Можно представить двумерный массив как сетку клеток – ячеек. Положение каждой ячейки определяется парой чисел: Номером столбца и Номером строки.

Двумерный массив объявить можно следующим образом:

Dim/Public/Private/Static ИмяМассива(ИндексСтолбца, ИндексСтроки) As ТипДанных

В индексе можно использовать слово To, чтобы задать диапазон изменения индекса любой из размерностей массива. Например, чтобы объявить описанный выше массив, можно воспользоваться следующим оператором:

Dim iMassiv(2,3) As Integer

Массив jVar( ), состоящий из десяти столбцов и пяти строк, можно объявить следующим образом:

Private jVar(1 To 10, 1 To 5)

Тогда столбцы массива jVar( ) будут нумероваться с 1 до 10, а строки с 1 до 5.

Напишите фрагмент кода программы для вывода двумерного массива на форму.

For i = 1 To n

         For j = 1 To m

   Print A(i, j);

   Next j

 Print

Next i

 Print

Стасюк М.Ю.




1. Реферат- Религия как социальный институт.html
2. Национальный исследовательский ядерный университет МИФИ СФТИ НИЯУ МИФИ К
3. Тема- Питание и кормление пациента
4. ПОЯСНИТЕЛЬНАЯ ЗАПИСКА Актуальность и практическая значимость для обучающихся- Информатические поняти
5. методологічні основи політичної науки Курс лекцій для студентів всіх форм навчання
6. тема мероприятий направленных на реализацию долгосрочных задач социальноэкономического развития государс
7. Влияние никотина на организм подростк
8. Кожа ~ вверху тонкая подвижная внизу более плотная
9. Проблема создания промышленных агрегатов для утилизации твердых углеродистых отходов
10. клиентсервер Архитектура клиентсервер основанная на Webтехнологии Обобщенная схема взаимодейст
11. а фактологически доказанное утверждение в рамках теории концепции гипотезы объясняющее объективные фак
12. Сказание о Борисе и Глебе
13. ОПРЕДЕЛЕНИЕ КОЭФФИЦИЕНТА ПУАССОНА ДЛЯ ВОЗДУХА МЕТОДОМ КЛЕМАНА ДЕЗОРМА ЦЕЛЬ РАБОТЫ- изучение изопро
14. Постсоциалистические изменения в Болгарии
15. Crem nd chicken rlls re so populr mong children nd teens
16. существительные
17.  Цель работы4 2
18. Качественные и количественные критерии и показатели эффективности государственного управлени
19. мес 36 20 62 03 мес
20. а с четко очерченным симптомокомплексом включающим острые и хронические патологические со