- •1 Знакомство с Visual Basic
- •1.1 Первое знакомство
- •1.1.1 Запуск VB
- •1.1.2 Выход из VB
- •1.1.3 Практическое задание
- •1.2 Файлы проекта
- •1.3 Шаги создания проекта на VB
- •1.3.1 Планирование действий, выполняемых приложением
- •1.3.2 Планирование пользовательского интерфейса
- •1.3.3 Установка свойств
- •1.3.4 Написание текста программы
- •1.3.5 Отладка приложения
- •1.4 Первый проект
- •1.4.1 Основные сведения об исполнении приложений в операционной системе Windows
- •1.4.2 Разработка проекта
- •1.4.3 Условие задачи
- •1.4.4 Элементы управления
- •1.4.4.1 Вставка надписей
- •1.2.1 Разработка программы
- •1.3 Усовершенствование проекта
- •1.4 Компиляция проекта
- •1.5 Отображение окон в среде VB
- •1.6 Вопросы для контроля
- •2 Переменные и константы
- •2.1 Основные типы данных VB
- •2.2 Структура проекта
- •2.3 Объявление переменных и констант
- •2.4 Преобразование и совместимость типов
- •2.5 Разработка проекта
- •2.6 Вопросы для контроля
- •3 Ввод и вывод значений переменных
- •3.1 Ввод данных с помощью функции InputBox
- •3.2 Вывод данных с помощью инструкции Print
- •3.3 Вывод данных с помощью функции MsgBox
- •3.4 Вопросы для контроля
- •4 Выражения в VB
- •4.1 Арифметические операции
- •4.1.1 Сложение
- •4.1.2 Вычитание
- •4.1.3 Умножение
- •4.1.4 Деление
- •4.1.5 Возведение в степень
- •4.1.6 Целочисленное деление
- •4.1.7 Остаток от деления
- •4.1.8 Унарный минус
- •4.2 Логические операции
- •4.2.1 Логическое И
- •4.2.2 Логическое ИЛИ
- •4.2.3 Логическое НЕ
- •4.2.4 Операции отношения
- •4.3 Символьные операции
- •4.4 Синтаксис выражений
- •4.5 Явное преобразование типов данных
- •4.6 Задание для самостоятельной работы
- •4.7 Вопросы для контроля
- •5 Конструкции VB, реализующие базовые алгоритмические структуры
- •5.1 Базовые структуры алгоритмов
- •5.1.1 Следование (композиция)
- •5.1.2 Ветвление
- •5.1.3 Цикл
- •5.2 Конструкция If..Then
- •5.3 Конструкция Select … Case
- •5.4 Конструкция Do…Loop
- •5.5 Цикл со счетчиком. Конструкция For…Next
- •5.6 Задание для самостоятельной работы
- •6 Массивы в VB
- •7 Алгоритмы сортировки
- •7.1 Алгоритм сортировки выборкой
- •7.2 Алгоритм сортировки вставкой
- •7.3 Алгоритм пузырьковой сортировки
- •7.4 Алгоритм быстрой сортировки
- •7.5 Алгоритм сортировки слиянием
- •7.6 Алгоритм сортировки подсчетом
- •8 Обработка строк в VB
- •9 Чтение и сохранение данных в файлы, выполнение операций с файлами в VB
- •10 Приложение: Коды ошибок VB
- •11 Описание событий VB
- •12 Приложение: Таблица кодов ASCII
- •13 Приложение: Виртуальные коды клавиш
- •14 Приложение: Функции VB (алфавитный перечень)
- •14.1.2 Array
- •14.3.1 Функции конвертирования типов
- •14.3.1.1 CBool
- •14.3.1.2 CByte
- •14.3.1.3 CCur
- •14.3.1.4 CDate
- •14.3.1.5 CDbl
- •14.3.1.6 CInt
- •14.3.1.7 CLng
- •14.3.1.8 CSng
- •14.3.1.9 CStr
- •14.3.1.10 CVar
- •14.3.4 Command
- •14.3.5 CreateObject
- •14.3.6 CurDir
- •14.3.7 CVErr
- •14.4.1 Date
- •14.4.2 DateAdd
- •14.4.3 DateDiff
- •14.4.4 DatePart
- •14.4.5 DateSerial
- •14.4.6 DateValue
- •14.4.9 DoEvents
- •14.5.1 Environ
- •14.5.3 Error
- •14.6.1 FileAttr
- •14.6.2 FileDateTime
- •14.6.3 FileLen
- •14.6.5 Format
- •14.6.6 FreeFile
- •14.7.1 GetAllSettings
- •14.7.2 GetAttr
- •14.7.3 object.GetAutoServerSettings
- •14.7.4 GetObject
- •14.7.5 GetSetting
- •14.8.2 Hour
- •14.9.2 Input
- •14.9.3 InputBox
- •14.9.4 InStr
- •14.9.6 IsMissing
- •14.9.7 IsNull
- •14.9.8 IsNumeric
- •14.9.9 IsObject
- •14.11.1 LBound
- •14.11.2 LCase
- •14.11.3 Left
- •14.11.5 LoadPicture
- •14.11.9 LTrim
- •14.12.2 Minute
- •14.12.3 Month
- •14.12.4 MsgBox
- •14.14.2 QBColor
- •14.15.1 SaveSetting
- •14.15.2 Seek
- •14.15.4 Shell
- •14.15.9 StrComp
- •14.15.10 StrConv
- •14.15.11 String
- •14.15.12 Switch
- •14.16.3 Time
- •14.16.4 Timer
- •14.16.5 TimeSerial
- •14.16.6 TimeValue
- •14.16.7 Trim
- •14.16.8 TypeName
- •14.17.1 UBound
- •14.17.2 UCase
- •14.18.2 VarType
- •14.19.1 Weekday
- •14.20.1 Year
- •15 Приложение: Функции VB (по назначению)
- •15.1 Арифметические
- •15.2 Строковые (символьные)
- •15.3 Логические
- •15.4 Дата и время
- •15.5 Преобразование и конвертирование значений
- •15.5.2 Функции конвертирования типов
- •15.5.2.1 CBool
- •15.5.2.2 CByte
- •15.5.2.3 CCur
- •15.5.2.4 CDate
- •15.5.2.5 CDbl
- •15.5.2.6 CInt
- •15.5.2.7 CLng
- •15.5.2.8 CSng
- •15.5.2.9 CStr
- •15.5.2.10 CVar
- •15.6 Массивы
- •15.7 Работа с файлами и ОС
- •15.7.17 SaveSetting
- •16 Приложение: Дополнительные материалы по вычислению некоторых выражений
- •17 Приложение: Операторы VB
- •17.1.1 AppActivate
- •17.2.1 Beep
- •17.3.1 Call
- •17.3.2 ChDir
- •17.3.3 ChDrive
- •17.3.4 Close
- •17.3.5 Const
- •17.4.1 Date
- •17.5 Def<Type>
- •17.5.1 DeleteSetting
- •17.5.3 Do... Loop
- •17.6.1 End [<Конструкция>]
- •17.6.2 Enum
- •17.6.3 Erase
- •17.6.4 Error
- •17.6.5 Event
- •17.6.6 Exit <Кострукция>
- •17.7.1 FileCopy
- •17.7.2 For Each...Next
- •17.7.3 For...Next
- •17.7.4 Function
- •17.8.2 GoSub
- •17.8.3 GoTo
- •17.9.2 Implements
- •17.9.3 Input
- •17.10.1 Kill
- •17.11.2 Like
- •17.11.3 Line Input
- •17.11.4 Load
- •17.11.5 Lock
- •17.11.6 LSet
- •17.12.2 MkDir
- •17.13.1 Name
- •17.14.1 On Error
- •17.14.2 Open
- •17.14.3 Option Base
- •17.14.4 Option Compare
- •17.14.5 Option Explicit
- •17.14.6 Option Private
- •17.15.1 Print
- •17.15.2 Private
- •17.15.3 Property Get
- •17.15.5 Property Set
- •17.15.6 Public
- •17.16.1 RaiseEvent
- •17.16.2 Randomize
- •17.16.3 ReDim
- •17.16.5 Reset
- •17.16.6 Resume
- •17.16.7 RmDir
- •17.16.8 RSet
- •17.17.1 SavePicture
- •17.17.2 SaveSetting
- •17.17.3 Seek
- •17.17.4 Select Case
- •17.17.5 SendKeys
- •17.17.7 SetAttr
- •17.17.8 Static
- •17.17.9 Stop
- •17.18.1 Time
- •17.18.2 Type
- •17.19.1 Unload
- •17.20.2 Width
- •17.20.3 With
- •17.20.4 Write
6 Массивы в VB
ЦЯрсн опз пЯжпЯансйд опзкнедмзи бнжмзйЯдс мднафнгзлнрсы напЯансйз анкычзф нащдлнб гЯммъф, опзцдл б анкычзмрсбд рктцЯдб, гЯммъд юбкюэсрю нгмнсзомълз, Я напЯансйЯ рбнгзсрю й бъонкмдмзэ нгмнсзомъф нодпЯхзи мЯг мзл.
Гкю ьуудйсзбмни пЯансъ р сЯйзлз гЯммълз опзлдмюэсрю нрнаъд рсптйстпъ гЯммъф – лЯррзбъ.
Массив – ьсн индексированный набор однотипных значений.
Онгнамн одпдлдммни, онжбнкюэшди фпЯмзсы нгмн жмЯцдмзд жЯгЯммнвн сзоЯ,
лЯррзб злддс злю. НгмЯйн р гЯммъл злдмдл рбюжЯмн нопдгдкдммнд йнкзцдрсбн жмЯцдмзи. Гкю снвн цснаъ онктцзсы спдатдлнд б сдйтшзи лнлдмс жмЯцдмзд мдгнрсЯснцмн тйЯжЯсы нгмн кзчы злю, йЯй б рктцЯд р одпдлдммни.
Гкю цдсйнвн тйЯжЯмзю йнмйпдсмнвн жмЯцдмзю зж мЯанпЯ мднафнгзлн гнонкмзсдкымн тйЯжЯсы змгдйр жмЯцдмзю б злдмнбЯммнл мЯанпд жмЯцдмзи лЯррзбЯ. ПЯррлнспзл опзлдп, опдгрсЯбкдммъи мЯ ркдгтэшдл пзртмйд:
|
Массив А |
|
|
|
|
|
|
|
|
||
|
|
|
|
|
|
|
|
|
|
|
|
Индексы элементов: |
0 |
1 |
|
2 |
3 |
4 |
5 |
6 |
7 |
8 |
9 |
|
|
|
|
|
|
|
|
|
|
|
|
Значения элементов: |
5 |
4 |
|
6 |
3 |
2 |
6 |
1 |
0 |
9 |
3 |
|
|
|
|
|
|
|
|
|
|
|
|
ОпдгрсЯбкдммъи мЯ пзртмйд лЯррзб р злдмдл Џ рнгдпезс гдрюсы жмЯцдмзи мЯжъбЯдлъф ькдлдмсЯлз. ЙЯегъи элемент лЯррзбЯ Џ злддс индекс
(мнлдп), он йнснпнлт лнемн опнзжбнгзсы напЯшдмзд й мдлт. МЯопзлдп,
ькдлдмс лЯррзбЯ Џ р змгдйрнл 6 злддс жмЯцдмзд 1, Я ькдлдмс лЯррзбЯ Џ р змгдйрнл 2 жмЯцдмзд 6.
Гкю напЯшдмзю й ькдлдмст лЯррзбЯ б VB зронкыжтдсрю ркдгтэшЯю йнмрсптйхзю: <Злю лЯррзбЯ>(<Змгдйр ькдлдмсЯ лЯррзбЯ>). ЙЯегъи йнмйпдсмъи ькдлдмс лЯррзбЯ, йЯй з одпдлдммЯю, гнрстодм бн бпдлю зронкмдмзю гкю цсдмзю з гкю жЯозрз жмЯцдмзи. МЯопзлдп, опз бъонкмдмзз ркдгтэшди рспнйз зрфнгмнвн йнгЯ:
Џ(1) = Џ(6) + Џ(2)
Опз бъонкмдмзз нодпЯснпЯ опзрбЯзбЯмзю атгдс бъцзркдмн жмЯцдмзд
бъпЯедмзю Џ(6) + Џ(2). Опз бъцзркдмзз гЯммнвн бъпЯедмзю атгтс опнцзсЯмъ жмЯцдмзю ькдлдмснб лЯррзбЯ р змгдйрЯлз 6 з 2 з мЯигдмЯ зф ртллЯ. СЯйзл напЯжнл, жмЯцдмзд бъпЯедмзю Џ(6) + Џ(2) = 1 + 6 = 7.
Бъцзркдммъи пджткысЯс атгдс опзрбндм ькдлдмст лЯррзбЯ Џ р змгдйрнл 1.
Опз ьснл атгдс опнзжбдгдмЯ жЯозры бъцзркдммнвн жмЯцдмзю 7 б накЯрсы оЯлюсз рбюжЯммтэ р ькдлдмснл лЯррзбЯ Џ р змгдйрнл 1. Онркд бъонкмдмзю гЯммни рспнйз лЯррзб атгдс рнгдпеЯсы ркдгтэшзд жмЯцдмзю:
|
Массив А |
|
|
|
|
|
|
|
|
||
|
|
|
|
|
|
|
|
|
|
|
|
Индексы элементов: |
0 |
1 |
|
2 |
3 |
4 |
5 |
6 |
7 |
8 |
9 |
|
|
|
|
|
|
|
|
|
|
|
|
Значения элементов: |
5 |
7 |
|
6 |
3 |
2 |
6 |
1 |
0 |
9 |
3 |
|
|
|
|
|
|
|
|
|
|
|
|
ЛЯррзбъ нащюбкюэсрю р зронкыжнбЯмздл йнмрсптйхзи, онгнамъф йнмрсптйхзюл нащюбкдмзю одпдлдммъф з лнвтс злдсы сд ед накЯрсз бзгзлнрсз, цсн з одпдлдммъд.
РзмсЯйрзр йнмрсптйхзз нащюбкдмзю лЯррзбЯ:
{Static|Public|Private|Dim} <ЗлюЛЯррзбЯ>([[<Мземюю впЯмзхЯ1> To] <Бдпфмюю впЯмзхЯ1>[, >([<Мземюю впЯмзхЯ2> To] <Бдпфмюю впЯмзхЯ2>[,…]]]) [As Сзо]
Жгдры
<Мземюю впЯмзхЯN> - ьсн жмЯцдмзд змгдйрЯ, р йнснпнвн мЯцзмЯэс мтлдпнбЯсы ькдлдмсъ лЯррзбЯ;
<Бдпфмюю впЯмзхЯN> - ьсн жмЯцдмзд змгдйрЯ, р йнснпнвн мЯцзмЯэс мтлдпнбЯсы ькдлдмсъ лЯррзбЯ;
N – ьсн мнлдп пЯжлдпмнрсз.
Дркз оЯпЯлдсп «Мземюю впЯмзхЯ» мд тйЯжЯм, сн он тлнкцЯмзэ лЯррзб змгдйрзптдсрю р 0. НгмЯйн опз мднафнгзлнрсз жмЯцдмзд он тлнкцЯмзэ гкю гЯммнвн оЯпЯлдспЯ лнедс аъсы зжлдмдмн р онлншыэ нохзз змсдпопдсЯснпЯ
Option Base. МЯигзсд нозрЯмзд з нжмЯйнлысдры р рзмсЯйрзрнл гЯммни нохзз
(Опзкнедмзд: НодпЯснпъ VB).
Б нашдл рктцЯд лЯррзб лнедс аъсы лмнвнлдпмъл. СЯй опдгрсЯбкдммъи мЯ ркдгтэшдл пзртмйд лЯррзб юбкюдсрю гбтфлдпмъл:
Массив А
Индексы элементов |
|
|
|
|
|
|
|
|
|
0 |
1 |
2 |
3 |
4 |
5 |
6 |
7 |
8 |
9 |
0 |
1 |
2 |
3 |
4 |
5 |
6 |
7 |
8 |
9 |
Значения элементов
0 |
1 |
2 |
3 |
4 |
5 |
6 |
7 |
8 |
9 |
|
|
|
|
|
|
|
|
|
|
1 |
1 |
2 |
3 |
4 |
5 |
6 |
7 |
8 |
9 |
|
|
|
|
|
|
|
|
|
|
2 |
2 |
4 |
6 |
8 |
10 |
12 |
14 |
16 |
18 |
|
|
|
|
|
|
|
|
|
|
3 |
3 |
6 |
9 |
12 |
15 |
18 |
21 |
24 |
27 |
|
|
|
|
|
|
|
|
|
|
4 |
4 |
8 |
12 |
16 |
20 |
24 |
28 |
32 |
36 |
|
|
|
|
|
|
|
|
|
|
5 |
5 |
10 |
15 |
20 |
25 |
30 |
35 |
40 |
45 |
6 |
6 |
12 |
18 |
24 |
30 |
36 |
42 |
48 |
54 |
|
|
|
|
|
|
|
|
|
|
7 |
7 |
14 |
21 |
28 |
35 |
42 |
49 |
56 |
63 |
|
|
|
|
|
|
|
|
|
|
8 |
8 |
16 |
24 |
32 |
40 |
48 |
56 |
64 |
72 |
|
|
|
|
|
|
|
|
|
|
9 |
9 |
18 |
27 |
36 |
45 |
54 |
63 |
72 |
81 |
|
|
|
|
|
|
|
|
|
|
А(4,5)
МЯ пзртмйд опдгрсЯбкдм гбтфлдпмъи лЯррзб, б йнснпнл фпЯмзсрю сЯакзхЯ тлмнедмзю. Ькдлдмсъ сЯйнвн лЯррзбЯ «пЯронкЯвЯэсрю» б
одпдрдцдмзюф рннсбдсрбтэшзф рснкахнб з рспнй. Опзцдл мдс опзмхзозЯкымни пЯжмзхъ б снл, цснаъ рцзсЯсы одпбъл змгдйрнл
(йннпгзмЯсни) мнлдп рснкахЯ зкз рспнйз. НгмЯйн, гкю снвн цснаъ зрйкэцзсы адрйнмдцмъд тснцмдмзю опзмюсни б йЯегнл йнмйпдсмнл рктцЯд «рзрсдлъ йннпгзмЯс», тркнбзлрю, цсн одпбъи змгдйр – ьсн мнлдп рспнйз, Я бснпни – рснкахЯ. МЯ пзртмйд опдгъгтшдвн опзлдпЯ бъгдкдм рдпъл хбдснл ькдлдмс р змгдйрЯлз 4,5, цсн ркдгтдс онмзлЯсы йЯй ькдлдмс 4-и рспнйз з 5-вн рснкахЯ.
Б цдл опдзлтшдрсбн лЯррзбнб он рпЯбмдмзэ р одпдлдммълз? Бн-
одпбъф, гкю фпЯмдмзю сЯакзхъ тлмнедмзю спдатдсрю рнжгЯсы 100 одпдлдммъф зкз нгзм лЯррзб, рнрснюшзи зж 100 ькдлдмснб. Сн дрсы опз зронкыжнбЯмзз одпдлдммъф гкю фпЯмдмзю сЯйнвн нащдлЯ гЯммъф спдатдсрю зронкыжнбЯсы мЯ
99, Я б нашдл рктцЯд мЯ N-1, вгд N – йнкзцдрсбн фпЯмзлъф жмЯцдмзи,
йнмрсптйхзи анкычд, цдл опз зронкыжнбЯмзз лЯррзбнб. Мн нрмнбмнд опдзлтшдрсбн лЯррзбнб рнрснзс гЯед мд б снл, цсн опз зф зронкыжнбЯмзз онюбкюдсрю бнжлнемнрсы ЯбснлЯсзжЯхзз напЯансйз гЯммъф, йнснпЯю
онжбнкюдс жмЯцзсдкымн рнйпЯсзсы спдатдлъи гкю нозрЯмзю мднафнгзлъф онркдгнбЯсдкымнрсди гдирсбзи нащдл зрфнгмнвн йнгЯ. Опз зронкыжнбЯмзз лЯррзбнб гЯммъф сЯйед рсЯмнбзсрю бнжлнемни пЯжпЯансйЯ йнлоЯйсмнвн йнгЯ,
онжбнкюэшдвн напЯаЯсъбЯсы мд рспнвн нопдгдкдммнд йнкзцдрсбн жмЯцдмзи, Я
сн йнснпнд спдатдсрю б йнмсдйрсд сдйтшди жЯгЯцз, пЯрфнгтю рснкыйн нодпЯсзбмни оЯлюсз, рйнкыйн спдатдсрю гкю дд пдчдмзю. МЯопзлдп, нгмн з сн ед опзкнедмзд лнедс напЯаЯсъбЯсы б нгмнл рктцЯд 50 жмЯцдмзи, б гптвнл
100, Я дркз онспдатдсрю, сн 1000 зкз анкдд.
Бнжлнемнрсы ЯбснлЯсзжзпнбЯммни напЯансйз онюбкюдсрю акЯвнгЯпю рзмсЯйрзрт йнмрсптйхзз напЯшдмзю й ькдлдмст лЯррзбЯ. ЙЯй бъ онлмзсд гкю напЯшдмзю й йнмйпдсмнлт ькдлдмст лЯррзбЯ мднафнгзлн тйЯжЯсы двн злю з б рйнайЯф змгдйр. Змгдйр ькдлдмсЯ лЯррзбЯ жЯгЯдсрю бъпЯедмздл, сн дрсы двн лнемн жЯгЯсы мдзлдмнбЯммни йнмрсЯмсни, йЯй б сдф опзлдпЯф, йнснпъд лъ пЯррлЯспзбЯкз пЯмдд, злдмнбЯммни йнмрсЯмсни, одпдлдммни зкз анкдд ркнемъл бъпЯедмздл. ПЯррлнспзл опзлдпъ сЯйзф напЯшдмзи й ькдлдмсЯл лЯррзбЯ:
Џ(2) – змгдйр ькдлдмсЯ жЯгЯм мдзлдмнбЯммни йнмрсЯмсни;
Џ(t) – змгдйр ькдлдмсЯ жЯгЯм одпдлдммни;
Џ(t+1) – змгдйр ькдлдмсЯ жЯгЯм бъпЯедмздл t+1.
СЯйзл напЯжнл, рсЯмнбзсрю тлдрсмъл зронкыжнбЯмзд гкю змгдйрзпнбЯмзю лЯррзбнб одпдлдмъф рцдсцзйнб. ПЯррлнспзл опзлдп сЯйнвн зрфнгмн йнгЯ:
…
Dim Џ(0 To 10) As Byte
Dim I as Byte
For I = 0 To 10
A(I) = I
Next
…
Б гЯммнл зрфнгмнл йнгд одпдлдммЯю рцдсцзй зронкыжтдсрю б йЯцдрсбд
змгдйрЯ лЯррзбЯ Џ. ПЯжпЯансЯисд опзкнедмзд, б йнснпнл гЯммъи зрфнгмъи йнг бйкэцдм б напЯансцзй рнаъсзю «ЖЯвптжйЯ унплъ», бъонкмзсд двн нскЯгйт з нунплзсд нсцдс н опнгдкЯммни пЯансд он ркдгтэшди унплд:
-зрфнгмъи йнг опзкнедмзю р онгпнамълз йнллдмсЯпзюлз опзлдмюдлъф б рспнйЯф зрфнгмнвн йнгЯ йнмрсптйхзюф;
-розрнй рспнй, зронкмдммъф змсдпопдсЯснпнл опз бъонкмдмзз опзкнедмзю, р йнллдмсЯпзюлз, б йнснпъф нозръбЯэсрю опнзжбнгзлъд опз зронкмдмзз рспнйз гдирсбзю, рнрснюмзю одпдлдммъф гн з онркд зронкмдмзю рспнйз. (Гкю рспнй, вгд опнзжбнгзсрю зжлдмдмзд жмЯцдмзи ькдлдмснб лЯррзбЯ, мднафнгзлн жЯозръбЯсы жмЯцдмзю брдф ькдлдмснб гн з онркд зжлдмдмзю б сЯакзцмни унплд онгнамни пзртмйЯл опзлдпнб опзбдгдммъф бъчд.) Опзбдгзсд жЯйкэцдмзд н снл, цсн опнзжбнгзсрю р лЯррзбнл б гЯммнл зрфнгмнл йнгд;
-бъбнг на ьуудйсзбмнрсз опзлдмдмзю лЯррзбнб. (Б бъбнгд ркдгтдс опзбдрсз зрфнгмъи йнг, бъонкмюэшзи онгнамтэ напЯансйт нгзмЯгхЯсз жмЯцдмзи, опз зронкыжнбЯмзз гкю зф фпЯмдмзю одпдлдммъф. Цзркдммн нхдмзсы ьуудйсзбмнрсы опзлдмдмзю лЯррзбнб цдпдж спдатдлнд йнкзцдрсбн рспнй зрфнгмнвн йнгЯ опз пдЯкзжЯхзз онгнамъф жЯгЯц р зронкыжнбЯмздл одпдлдммъф з лЯррзбнб гкю фпЯмдмзю з напЯансйз гЯммъф. )
ПЯррлнспзл онгпнамди ьуудйсзбмнд зронкыжнбЯмзд оЯлюсз опз пдчдмзз нгмнсзомъф жЯгЯц мЯг пЯжкзцмълз нащдлЯлз гЯммъф. Бдпмзсдры й нозрЯмзэ рзмсЯйрзрЯ йнмрсптйхзз нащюбкдмзю лЯррзбЯ з напЯсзсд бмзлЯмзд мЯ оЯпт йбЯгпЯсмъф рйнанй, б йнснпъд жЯйкэцдмъ нозрЯмзю пЯжлдпмнрсди лЯррзбЯ. Нмз онйЯжъбЯэс, цсн опз нащюбкдмзз лЯррзбЯ впЯмзхъ пЯжлдпмнрсди лнвтс мд нозръбЯсырю. Сн дрсы бонкмд тлдрсмЯ ркдгтэшЯю йнмрсптйхзю нащюбкдмзю лЯррзбЯ:
Dim A() As Byte
СЯйЯю йнмрсптйхзю онжбнкюдс нопдгдкзсы лЯррзб адж тйЯжЯмзю впЯмзх,
рннашзсы змсдпопдсЯснпт, цсн б опзкнедмзз атгдс зронкыжнбЯсырю лЯррзб р злдмдл Џ, мн впЯмзхъ лЯррзбЯ атгтс жЯгЯммъ онжед. ЛЯррзб, гкю йнснпнвн
впЯмзхъ мд жЯгЯмъ мЯ рсЯгзз нащюбкдмзю, мЯжъбЯдсрю динамическим (нм лнедс гзмЯлзцдрйз зжлдмюсы йнкзцдрсбн фпЯмзлъф ькдлдмснб он спданбЯмзэ). Зжлдмдмзд впЯмзх гзмЯлзцдрйнвн лЯррзбЯ опнзжбнгзсрю р онлншыэ родхзЯкымни йнмрсптйхзз Redim. МЯигзсд нозрЯмзд з нжмЯйнлысдры р рзмсЯйрзрнл гЯммни йнмрсптйхзз (Опзкнедмзд: НодпЯснпъ
VB ).
АкЯвнгЯпю опзлдмдмзэ гзмЯлзцдрйзф лЯррзбнб бъ лнедсд пЯжпЯаЯсъбЯсы опзкнедмзю, йнснпъд б йЯегъи лнлдмс бпдлдмз жЯмзлЯэс снкыйн сЯйни нащдл нодпЯсзбмни оЯлюсз, йЯйни зл спдатдсрю гкю пЯансъ.
МЯопзлдп, опз пЯжпЯансйд опзкнедмзю, бъонкмюэшдвн рнжгЯмзд лЯррзбЯ р йнкзцдрсбнл ькдлдмснб, жЯгЯбЯдлъф онкыжнбЯсдкдл бн бпдлю зронкмдмзю опзкнедмзю, пЯжпЯансцзй лнедс ьуудйсзбмн зронкыжнбЯсы гзмЯлзцдрйзи лЯррзб. Гдирсбзсдкымн мЯ рсЯгзз пЯжпЯансйз мдкыжю жЯпЯмдд жмЯсы пЯжлдп лЯррзбЯ, спдатдлнвн онкыжнбЯсдкэ опз пдчдмзз жЯгЯцз. Опз зронкыжнбЯмзз рсЯсзцдрйнвн лЯррзбЯ пЯжпЯансцзйт онспданбЯкнры аъ нхдмзсы пдчЯдлтэ жЯгЯцт з жЯгЯсы впЯмзхъ лЯррзбЯ лЯйрзлЯкымн бнжлнемълз, Я опз гЯкымдичдл зронкмдмзз опзкнедмзю зронкыжнбЯсы кзчы сд ькдлдмсъ лЯррзбъ, йнснпъд мднафнгзлъ. Дркз онкыжнбЯсдкэ спдатдсрю лдмычдд йнкзцдрсбн ькдлдмснб, цдл тйЯжЯмн опз нащюбкдмзз рсЯсзцдрйнвн лЯррзбЯ, сн брд мдбнрспданбЯммъд ькдлдмсъ сЯйед атгтс жЯмзлЯсы нодпЯсзбмтэ оЯлюсы.
РЯлнрснюсдкымн пЯжпЯансЯисд опзкнедмзд рнжгЯэшдд лЯррзб,
змгдйрзпнбЯммъи р 1 з р йнкзцдрсбнл ькдлдмснб жЯгЯммъл онкыжнбЯсдкдл.
ЖЯгЯисд ькдлдмсЯл лЯррзбЯ жмЯцдмзю пЯбмъд зф змгдйрЯл з бъбдгзсд жмЯцдмзю ькдлдмснб лЯррзбЯ б сдйрснбнд онкд б унплЯсд «Џ(1)=1, Џ(2)=2, …».
Б нсцдсд опзбдгзсд ьрйзж унплъ, акнй-рфдлт опзкнедмзю з зрфнгмъи
йнг.
Лнгзузхзптисд опзкнедмзд сЯйзл напЯжнл, цснаъ лЯррзб жЯонкмюкрю рктцЯимълз цзркЯлз, Я б гнонкмзсдкымнд сдйрснбнд онкд бъбнгзкрю нсцдс н ртллд жмЯцдмзи ькдлдмснб лЯррзбЯ. Гнонкмзсд нсцдс.
ПЯжпЯансЯисд опзкнедмзд, бъонкмюэшдд рнжгЯмзд гбтфлдпмнвн лЯррзбЯ пЯжлдпмнрсыэ 10ф10, жЯонкмдммнвн жмЯцдмзюлз, пЯбмълз опнзжбдгдмзюл змгдйрнб рннсбдсрбтэшзф ькдлдмснб (сЯакзхЯ тлмнедмзю).
ГнпЯансЯисд опзкнедмзд сЯйзл напЯжнл, цснаъ он спданбЯмзэ онкыжнбЯсдкю гкю тйЯжЯммни зл рспнйз лЯспзхъ бъонкмюкрю пЯрцдс ртллъ ькдлдмснб.