ΠŸΠΎΠΌΠΎΡ‰ΡŒ Π² написании студСнчСских Ρ€Π°Π±ΠΎΡ‚
АнтистрСссовый сСрвис

Π Π°Π·Ρ€Π°Π±ΠΎΡ‚ΠΊΠ° ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ½ΠΎΠ³ΠΎ модуля

ΠšΡƒΡ€ΡΠΎΠ²Π°ΡΠŸΠΎΠΌΠΎΡ‰ΡŒ Π² Π½Π°ΠΏΠΈΡΠ°Π½ΠΈΠΈΠ£Π·Π½Π°Ρ‚ΡŒ ΡΡ‚ΠΎΠΈΠΌΠΎΡΡ‚ΡŒΠΌΠΎΠ΅ΠΉ Ρ€Π°Π±ΠΎΡ‚Ρ‹

ЦСлью Π΄Π°Π½Π½ΠΎΠΉ курсовой Ρ€Π°Π±ΠΎΡ‚Ρ‹ Π½Π° Ρ‚Π΅ΠΌΡƒ «Π Π°Π·Ρ€Π°Π±ΠΎΡ‚ΠΊΠ° ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ½ΠΎΠ³ΠΎ модуля» являСтся созданиС ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ½ΠΎΠ³ΠΎ модуля, ΠΏΠΎΠ·Π²ΠΎΠ»ΡΡŽΡ‰Π΅Π³ΠΎ Π²ΠΎ Π²Π²Π΅Π΄Π΅Π½Π½ΠΎΠΌ массивС символов ΡƒΠ΄Π°Π»ΠΈΡ‚ΡŒ всС ΠΏΠΎΠ²Ρ‚ΠΎΡ€Π½Ρ‹Π΅ вхоТдСния этих символов. Для Ρ€Π°Π·Ρ€Π°Π±ΠΎΡ‚ΠΊΠΈ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹ использован язык программирования VBA (Visual Basic for Applications). ΠšΡƒΡ€ΡΠΎΠ²Π°Ρ Ρ€Π°Π±ΠΎΡ‚Π° ΠΏΠΎ Ρ€Π°Π·Ρ€Π°Π±ΠΎΡ‚ΠΊΠ΅ прилоТСния (ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ½ΠΎΠ³ΠΎ модуля Π²Ρ‹ΠΏΠΎΠ»Π½Π΅Π½Π° Π½Π° ΡΠ·Ρ‹ΠΊΠ΅ программирования VBA… Π§ΠΈΡ‚Π°Ρ‚ΡŒ Π΅Ρ‰Ρ‘ >

Π Π°Π·Ρ€Π°Π±ΠΎΡ‚ΠΊΠ° ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ½ΠΎΠ³ΠΎ модуля (Ρ€Π΅Ρ„Π΅Ρ€Π°Ρ‚, курсовая, Π΄ΠΈΠΏΠ»ΠΎΠΌ, ΠΊΠΎΠ½Ρ‚Ρ€ΠΎΠ»ΡŒΠ½Π°Ρ)

Π‘ΠΎΠ΄Π΅Ρ€ΠΆΠ°Π½ΠΈΠ΅ Π’Π²Π΅Π΄Π΅Π½ΠΈΠ΅

1. ΠŸΠΎΡΡ‚Π°Π½ΠΎΠ²ΠΊΠ° Π·Π°Π΄Π°Ρ‡ΠΈ

1.1 ΠœΠ°Ρ‚Π΅ΠΌΠ°Ρ‚ΠΈΡ‡Π΅ΡΠΊΠ°Ρ модСль Π·Π°Π΄Π°Ρ‡ΠΈ

1.2 Π’Ρ…ΠΎΠ΄Π½Ρ‹Π΅ Π΄Π°Π½Π½Ρ‹Π΅

1.3 Π’Ρ‹Ρ…ΠΎΠ΄Π½Ρ‹Π΅ Π΄Π°Π½Π½Ρ‹Π΅

1.4 ΠžΠ±Ρ€Π°Π±ΠΎΡ‚ΠΊΠ° ошибок

2. ΠŸΡ€ΠΎΠ΅ΠΊΡ‚ΠΈΡ€ΠΎΠ²Π°Π½ΠΈΠ΅ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ½ΠΎΠ³ΠΎ модуля Бтруктурная Π΄ΠΈΠ°Π³Ρ€Π°ΠΌΠΌΠ° ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ½ΠΎΠ³ΠΎ модуля Π Π°Π·Ρ€Π°Π±ΠΎΡ‚ΠΊΠ° схСмы ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ½ΠΎΠ³ΠΎ модуля ΠΈ Π΅Π΅ ΠΎΠΏΠΈΡΠ°Π½ΠΈΠ΅

2.3 Π Π°Π·Ρ€Π°Π±ΠΎΡ‚ΠΊΠ° ΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Ρ‚Π΅Π»ΡŒΡΠΊΠΎΠ³ΠΎ интСрфСйса

3. РСализация ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ½ΠΎΠ³ΠΎ модуля Код ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹ ОписаниС ΠΈΡΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Π½Π½Ρ‹Ρ… ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ΠΎΠ² ΠΈ Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΉ

4. ВСстированиС ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ½ΠΎΠ³ΠΎ модуля Π—Π°ΠΊΠ»ΡŽΡ‡Π΅Π½ΠΈΠ΅ Бписок ΠΈΡΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Π½Π½Ρ‹Ρ… источников

Π’Π²Π΅Π΄Π΅Π½ΠΈΠ΅

ЦСлью Π΄Π°Π½Π½ΠΎΠΉ курсовой Ρ€Π°Π±ΠΎΡ‚Ρ‹ Π½Π° Ρ‚Π΅ΠΌΡƒ «Π Π°Π·Ρ€Π°Π±ΠΎΡ‚ΠΊΠ° ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ½ΠΎΠ³ΠΎ модуля» являСтся созданиС ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ½ΠΎΠ³ΠΎ модуля, ΠΏΠΎΠ·Π²ΠΎΠ»ΡΡŽΡ‰Π΅Π³ΠΎ Π²ΠΎ Π²Π²Π΅Π΄Π΅Π½Π½ΠΎΠΌ массивС символов ΡƒΠ΄Π°Π»ΠΈΡ‚ΡŒ всС ΠΏΠΎΠ²Ρ‚ΠΎΡ€Π½Ρ‹Π΅ вхоТдСния этих символов. Для Ρ€Π°Π·Ρ€Π°Π±ΠΎΡ‚ΠΊΠΈ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹ использован язык программирования VBA (Visual Basic for Applications).

Данная курсовая Ρ€Π°Π±ΠΎΡ‚Π° состоит ΠΈΠ· Π½Π΅ΡΠΊΠΎΠ»ΡŒΠΊΠΈΡ… Ρ€Π°Π·Π΄Π΅Π»ΠΎΠ².

Π’ ΠΏΠ΅Ρ€Π²ΠΎΠΌ Ρ€Π°Π·Π΄Π΅Π»Π΅ — «ΠŸΠΎΡΡ‚Π°Π½ΠΎΠ²ΠΊΠ° Π·Π°Π΄Π°Ρ‡ΠΈ» — рассматриваСтся Π°Π»Π³ΠΎΡ€ΠΈΡ‚ΠΌ Π²Ρ‹Π±ΠΎΡ€Π° ΠΈΠ· ΠΌΠ°ΡΡΠΈΠ²Π° ΡƒΠ½ΠΈΠΊΠ°Π»ΡŒΠ½Ρ‹Ρ… Π±ΡƒΠΊΠ² (Π²ΡΡ‚Ρ€Π΅Ρ‡Π°ΡŽΡ‰ΠΈΡ…ΡΡ Ρ‚ΠΎΠ»ΡŒΠΊΠΎ Π΄ΠΈΠ½ Ρ€Π°Π·), Π° Ρ‚Π°ΠΊ ΠΆΠ΅ сортировка массива, ΠΎΠΏΠΈΡΡ‹Π²Π°ΡŽΡ‚ΡΡ всСвозмоТныС ошибки, Π° Ρ‚Π°ΠΊ ΠΆΠ΅ Π²Ρ…ΠΎΠ΄Π½Ρ‹Π΅ ΠΈ Π²Ρ‹Ρ…ΠΎΠ΄Π½Ρ‹Π΅ Π΄Π°Π½Π½Ρ‹Π΅.

Π’ΠΎ Π²Ρ‚ΠΎΡ€ΠΎΠΌ Ρ€Π°Π·Π΄Π΅Π»Π΅ «ΠŸΡ€ΠΎΠ΅ΠΊΡ‚ΠΈΡ€ΠΎΠ²Π°Π½ΠΈΠ΅ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ½ΠΎΠ³ΠΎ модуля» ΠΏΡ€ΠΈΠ²Π΅Π΄Π΅Π½Π° структурная Π΄ΠΈΠ°Π³Ρ€Π°ΠΌΠΌΠ° ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ½ΠΎΠ³ΠΎ модуля, схСма Π°Π»Π³ΠΎΡ€ΠΈΡ‚ΠΌΠ° с ΠΎΠΏΠΈΡΠ°Π½ΠΈΠ΅ΠΌ, Π° Ρ‚Π°ΠΊΠΆΠ΅ описан интСрфСйс Ρ€Π°Π·Ρ€Π°Π±ΠΎΡ‚Π°Π½Π½ΠΎΠ³ΠΎ модуля.

Π’ ΡΠ»Π΅Π΄ΡƒΡŽΡ‰Π΅ΠΌ Ρ€Π°Π·Π΄Π΅Π»Π΅ — «Π Π΅Π°Π»ΠΈΠ·Π°Ρ†ΠΈΡ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ½ΠΎΠ³ΠΎ модуля» — ΠΏΡ€ΠΈΠ²Π΅Π΄Π΅Π½ тСкст (ΠΊΠΎΠ΄) ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ½ΠΎΠ³ΠΎ модуля ΠΈ ΠΎΠΏΠΈΡΠ°Π½Ρ‹ ΠΈΡΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Π½Π½Ρ‹Π΅ ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€Ρ‹.

ΠšΡ€ΠΎΠΌΠ΅ этого, курсовая Ρ€Π°Π±ΠΎΡ‚Π° содСрТит тСстированиС Ρ€Π°Π·Ρ€Π°Π±ΠΎΡ‚Π°Π½Π½ΠΎΠ³ΠΎ модуля, Π·Π°ΠΊΠ»ΡŽΡ‡Π΅Π½ΠΈΠ΅ ΠΈ ΡΠΏΠΈΡΠΎΠΊ ΠΈΡΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Π½Π½Ρ‹Ρ… источников.

1. ΠŸΠΎΡΡ‚Π°Π½ΠΎΠ²ΠΊΠ° Π·Π°Π΄Π°Ρ‡ΠΈ

1.1 ΠœΠ°Ρ‚Π΅ΠΌΠ°Ρ‚ΠΈΡ‡Π΅ΡΠΊΠ°Ρ модСль Π·Π°Π΄Π°Ρ‡ΠΈ Алгоритм Ρ€Π΅ΡˆΠ΅Π½ΠΈΡ Π·Π°Π΄Π°Ρ‡ΠΈ состоит Π² ΡΠ»Π΅Π΄ΡƒΡŽΡ‰Π΅ΠΌ: вводится массив символов. Из ΡΡ‚ΠΎΠ³ΠΎ массива ΠΏΠΎ ΠΎΡ‡Π΅Ρ€Π΅Π΄ΠΈ ΠΏΠ΅Ρ€Π΅Π±ΠΈΡ€Π°ΡŽΡ‚ΡΡ всС символы ΠΈ ΡƒΠ΄Π°Π»ΡΡŽΡ‚ся символы, входящиС Π² Π½Π΅Π³ΠΎ Π±ΠΎΠ»Π΅Π΅ ΠΎΠ΄Π½ΠΎΠ³ΠΎ Ρ€Π°Π·Π°: Ссли Π² ΡΡ‚ΠΎΠΌ массивС Π΅ΡΡ‚ΡŒ Ρ‚Π°ΠΊΠΎΠΉ символ, Ρ‚ΠΎ ΠΎΠ½ ΡƒΠ΄Π°Π»ΡΠ΅Ρ‚ся со ΡΠ΄Π²ΠΈΠ³ΠΎΠΌ массива Π²Π»Π΅Π²ΠΎ ΠΈ ΡƒΠΌΠ΅Π½ΡŒΡˆΠ΅Π½ΠΈΠ΅ΠΌ количСства элСмСнтов.

1.2 Π’Ρ…ΠΎΠ΄Π½Ρ‹Π΅ Π΄Π°Π½Π½Ρ‹Π΅ К Π²Ρ…ΠΎΠ΄Π½Ρ‹ΠΌΠΈ Π΄Π°Π½Π½Ρ‹ΠΌ создаваСмого ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ½ΠΎΠ³ΠΎ модуля относится количСство элСмСнтов Π² ΠΌΠ°ΡΡΠΈΠ²Π΅ ΠΈ ΡΠ°ΠΌΠΈ элСмСнты массива ΡΠ²Π»ΡΡŽΡ‰ΠΈΠ΅ΡΡ Π»ΡŽΠ±Ρ‹ΠΌΠΈ символами.

ВрСбования ΠΊ Π²Π²Π΅Π΄Π΅Π½Π½Ρ‹ΠΌ Π΄Π°Π½Π½Ρ‹ΠΌ: количСство элСмСнтов Π΄ΠΎΠ»ΠΆΠ½ΠΎ Π±Ρ‹Ρ‚ΡŒ Ρ†Π΅Π»Ρ‹ΠΌ числом.

1.3 Π’Ρ‹Ρ…ΠΎΠ΄Π½Ρ‹Π΅ Π΄Π°Π½Π½Ρ‹Π΅ Π’Ρ‹Ρ…ΠΎΠ΄Π½Ρ‹ΠΌΠΈ Π΄Π°Π½Π½Ρ‹ΠΌΠΈ Ρ€Π°Π·Ρ€Π°Π±Π°Ρ‚Ρ‹Π²Π°Π΅ΠΌΠΎΠ³ΠΎ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ½ΠΎΠ³ΠΎ модуля являСтся массив символов, ΠΊΠΎΡ‚ΠΎΡ€Ρ‹Π΅ входят Π²ΠΎ Π²Π²Π΅Π΄Π΅Π½Π½Ρ‹ΠΉ массив Ρ‚ΠΎΠ»ΡŒΠΊΠΎ ΠΎΠ΄ΠΈΠ½ Ρ€Π°Π·.

1.4 ΠžΠ±Ρ€Π°Π±ΠΎΡ‚ΠΊΠ° ошибок Π’ΠΎ ΠΈΠ·Π±Π΅ΠΆΠ°Π½ΠΈΠ΅ ошибок Ρ€Π°Π±ΠΎΡ‚Ρ‹ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ½ΠΎΠ³ΠΎ модуля Π½Π΅ΠΎΠ±Ρ…ΠΎΠ΄ΠΈΠΌΠΎ ΠΎΡ€Π³Π°Π½ΠΈΠ·ΠΎΠ²Π°Ρ‚ΡŒ ΠΊΠΎΡ€Ρ€Π΅ΠΊΡ‚Π½Ρ‹ΠΉ Π²Π²ΠΎΠ΄ исходных Π΄Π°Π½Π½Ρ‹Ρ…, Ρ‚. Π΅. количСство элСмСнтов Π΄ΠΎΠ»ΠΆΠ½ΠΎ Π±Ρ‹Ρ‚ΡŒ Ρ†Π΅Π»Ρ‹ΠΌ числом. Π’ ΡΠ»ΡƒΡ‡Π°Π΅ возникновСния Ρ‚Π°ΠΊΠΎΠΉ ситуации ΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Ρ‚Π΅Π»ΡŒ ΡƒΠ²ΠΈΠ΄ΠΈΡ‚ Π½Π° ΡΠΊΡ€Π°Π½Π΅ ΡΠΎΠΎΡ‚Π²Π΅Ρ‚ΡΡ‚Π²ΡƒΡŽΡ‰Π΅Π΅ сообщСниС ΠΈ Π²Ρ‹ΠΏΠΎΠ»Π½Π΅Π½ΠΈΠ΅ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹ Π·Π°Π²Π΅Ρ€ΡˆΠΈΡ‚ΡŒΡΡ.

2. ΠŸΡ€ΠΎΠ΅ΠΊΡ‚ΠΈΡ€ΠΎΠ²Π°Π½ΠΈΠ΅ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ½ΠΎΠ³ΠΎ модуля

2.1 Бтруктурная Π΄ΠΈΠ°Π³Ρ€Π°ΠΌΠΌΠ° ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ½ΠΎΠ³ΠΎ модуля Π Π°Π·Ρ€Π°Π±Π°Ρ‚Ρ‹Π²Π°Π΅ΠΌΡ‹ΠΉ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ½Ρ‹ΠΉ ΠΌΠΎΠ΄ΡƒΠ»ΡŒ ΠΈΠΌΠ΅Π΅Ρ‚ ΡΠ»Π΅Π΄ΡƒΡŽΡ‰ΡƒΡŽ Π΄ΠΈΠ°Π³Ρ€Π°ΠΌΠΌΡƒ:

Рисунок 1 — Бтруктурная Π΄ΠΈΠ°Π³Ρ€Π°ΠΌΠΌΠ° ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ½ΠΎΠ³ΠΎ модуля ΠŸΡ€ΠΎΡ†Π΅Π΄ΡƒΡ€Π° CommandButtonl_Click () выполняСтся ΠΏΡ€ΠΈ Π½Π°ΠΆΠ°Ρ‚ΠΈΠΈ Π½Π° ΠΊΠ½ΠΎΠΏΠΊΡƒ «OК», Ρ€Π΅Π°Π»ΠΈΠ·ΡƒΡŽΡ‰Π°Ρ Π²Π²ΠΎΠ΄ количСства элСмСнтов ΠΈ ΠΏΡ€ΠΎΠ²Π΅Ρ€ΠΊΡƒ Π½Π° ΠΊΠΎΡ€Ρ€Π΅ΠΊΡ‚Π½ΠΎΡΡ‚ΡŒ Π²Π²ΠΎΠ΄Π°.

ΠŸΡ€ΠΎΡ†Π΅Π΄ΡƒΡ€Π° CommandButton2_Click () выполняСтся ΠΏΡ€ΠΈ Π½Π°ΠΆΠ°Ρ‚ΠΈΠΈ Π½Π° ΠΊΠ½ΠΎΠΏΠΊΡƒ «Π‘Π»Π΅Π΄ΡƒΡŽΡ‰ΠΈΠΉ», ввСсти ΠΎΡ‡Π΅Ρ€Π΅Π΄Π½ΠΎΠΉ элСмСнт, Π° Ρ‚Π°ΠΊΠΆΠ΅ Π² ΡΠΈΡ‚ΡƒΠ°Ρ†ΠΈΠΈ ΠΊΠΎΠ³Π΄Π° элСмСнт являСтся послСдним, удаляСт ΠΏΠΎΠ²Ρ‚ΠΎΡ€ΡΡŽΡ‰ΠΈΠ΅ΡΡ элСмСнты ΠΈ ΠΏΡ€ΠΎΠΈΠ·Π²ΠΎΠ΄ΠΈΡ‚ Π²Ρ‹Π²ΠΎΠ΄ Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚Π°.

2.2 Π Π°Π·Ρ€Π°Π±ΠΎΡ‚ΠΊΠ° схСмы Π°Π»Π³ΠΎΡ€ΠΈΡ‚ΠΌΠ° ΠΈ Π΅Π΅ ΠΎΠΏΠΈΡΠ°Π½ΠΈΠ΅ Рисунок 1 — Π‘Π»ΠΎΠΊ-схСма ΠΏΡ€ΠΎΡ†Π΅Π΄ΡƒΡ€Ρ‹ CommandButton1_Click ()

ОписаниС Π±Π»ΠΎΠΊΠΎΠ² Π±Π»ΠΎΠΊ-схСмы ΠΏΡ€ΠΎΡ†Π΅Π΄ΡƒΡ€Ρ‹ CommandButton1_Click ().

Π‘Π»ΠΎΠΊ 1 — Π’Π²ΠΎΠ΄ количСства элСмСнтов Π‘Π»ΠΎΠΊ 2 — Установка счСтчика Π²Π²ΠΎΠ΄ΠΈΠΌΠΎΠ³ΠΎ элСмСнта Π½Π° 1 элСмСнт Π‘Π»ΠΎΠΊ 3 — Π’Ρ‹Π²ΠΎΠ΄ строки с Π½ΠΎΠΌΠ΅Ρ€ΠΎΠΌ элСмСнта ΠΈ ΠΎΡ‡ΠΈΡΡ‚ΠΊΠ° поля Π²Π²ΠΎΠ΄Π° Π‘Π»ΠΎΠΊ 4 — ΠŸΡ€ΠΎΠ²Π΅Ρ€ΠΊΠ° коррСктности Π²Π²ΠΎΠ΄Π° Π‘Π»ΠΎΠΊ 5 Π’Ρ‹Π²ΠΎΠ΄ ΠΎΠΊΠ½Π° прСдупрСТдСния ΠΈ ΠΏΡ€Π΅Ρ€Ρ‹Π²Π°Π½ΠΈΠ΅ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹ Π‘Π»ΠΎΠΊ 6 — Активация ΠΊΠ½ΠΎΠΏΠΊΠΈ 'Π‘Π»Π΅Π΄ΡƒΡŽΡ‰ΠΈΠΉ'

Рисунок 2 — Π‘Π»ΠΎΠΊ-схСма ΠΏΡ€ΠΎΡ†Π΅Π΄ΡƒΡ€Ρ‹ CommandButton2_Click ()

ОписаниС Π±Π»ΠΎΠΊΠΎΠ² Π±Π»ΠΎΠΊ-схСмы ΠΏΡ€ΠΎΡ†Π΅Π΄ΡƒΡ€Ρ‹ CommandButton2_Click ().

Π‘Π»ΠΎΠΊ 7 — Π’Π²ΠΎΠ΄ ΠΎΡ‡Π΅Ρ€Π΅Π΄Π½ΠΎΠ³ΠΎ элСмСнта Π‘Π»ΠΎΠΊ 8 — ΠΏΡ€ΠΎΠ²Π΅Ρ€ΠΊΠ° являСтся Π»ΠΈ элСмСнт послСдним Π‘Π»ΠΎΠΊ 9 — скрытиС ΠΊΠ½ΠΎΠΏΠΎΠΊ Π‘Π»ΠΎΠΊ 10, 11, 14, 18 — организация Ρ†ΠΈΠΊΠ»ΠΎΠ² Π‘Π»ΠΎΠΊ 12 — ΠΏΡ€ΠΎΠ²Π΅Ρ€ΠΊΠ° Π½Π° ΡΠΎΠ²ΠΏΠ°Π΄Π΅Π½ΠΈΠ΅ элСмСнтов Π‘Π»ΠΎΠΊ 13 — очистка послСднСго элСмСнта Π‘Π»ΠΎΠΊ 15 — сдвиг элСмСнтов Π²Π»Π΅Π²ΠΎ Π‘Π»ΠΎΠΊ 16 — ΡƒΠΌΠ΅Π½ΡŒΡˆΠ΅Π½ΠΈΠ΅ количСства элСмСнтов Π½Π° 1 ΠΈ ΠΏΠ΅Ρ€Π΅Π·Π°ΠΏΡƒΡΠΊ ΠΏΡ€ΠΎΠ²Π΅Ρ€ΠΊΠΈ Π‘Π»ΠΎΠΊ 17 — активация Ρ€Π°ΠΌΠΊΠΈ с ΠΏΠΎΠ»Π΅ΠΌ Π²Ρ‹Π²ΠΎΠ΄Π° ΠΈ ΠΎΠ±Π½ΡƒΠ»Π΅Π½ΠΈΠ΅ строки с Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚Π°ΠΌΠΈ Π‘Π»ΠΎΠΊ 19 — Π΄ΠΎΠ±Π°Π²Π»Π΅Π½ΠΈΠ΅ ΠΊ ΡΡ‚Ρ€ΠΎΠΊΠ΅ Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚ΠΎΠ² элСмСнтов ΠΏΠΎΠ»ΡƒΡ‡Π΅Π½Π½ΠΎΠ³ΠΎ массива Π‘Π»ΠΎΠΊ 20 — Π²Ρ‹Π²ΠΎΠ΄ Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚ΠΎΠ² Π‘Π»ΠΎΠΊ 21 — ΠΎΠ±Π½ΠΎΠ²Π»Π΅Π½ΠΈΠ΅ надписи с Π½ΠΎΠΌΠ΅Ρ€ΠΎΠΌ Π²Π²ΠΎΠ΄ΠΈΠΌΠΎΠ³ΠΎ элСмСнта ΠΈ Π½ΠΎΠΌΠ΅Ρ€Π° элСмСнта

2.3 Π Π°Π·Ρ€Π°Π±ΠΎΡ‚ΠΊΠ° ΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Ρ‚Π΅Π»ΡŒΡΠΊΠΎΠ³ΠΎ интСрфСйса ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠΈΡ€ΠΎΠ²Π°Π½ΠΈΠ΅ ΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Ρ‚Π΅Π»ΡŒ интСрфСйс Как Π±Ρ‹Π»ΠΎ ΡƒΠΊΠ°Π·Π°Π½ΠΎ Π²Ρ‹ΡˆΠ΅ Π²Ρ…ΠΎΠ΄Π½Ρ‹ΠΌΠΈ Π΄Π°Π½Π½Ρ‹ΠΌΠΈ являСтся массив символов. ΠŸΠΎΡΡ‚ΠΎΠΌΡƒ создаваСмая Ρ„ΠΎΡ€ΠΌΠ° Π±ΡƒΠ΄Π΅Ρ‚ ΠΈΠΌΠ΅Ρ‚ΡŒ ΠΏΠΎΠ»Π΅ Π²Π²ΠΎΠ΄Π° строки.

Π’Ρ‹Ρ…ΠΎΠ΄Π½Ρ‹ΠΌΠΈ Π΄Π°Π½Π½Ρ‹ΠΌΠΈ являСтся массив символов, ΠΊΠΎΡ‚ΠΎΡ€Ρ‹ΠΉ Π±ΡƒΠ΄Π΅Ρ‚ Π²Ρ‹Π²ΠΎΠ΄ΠΈΡ‚ΡŒΡΡ Π² ΠΏΠΎΠ»Π΅ (TextBox). ΠŸΡ€ΠΈ Π²Π²ΠΎΠ΄Π΅ Π½Π΅ΠΊΠΎΡ€Ρ€Π΅ΠΊΡ‚Π½Ρ‹Ρ… Π΄Π°Π½Π½Ρ‹Ρ… появляСтся ΡΠΎΠΎΡ‚Π²Π΅Ρ‚ΡΡ‚Π²ΡƒΡŽΡ‰Π΅Π΅ сообщСниС Π² ΠΎΠΊΠ½Π΅ сообщСний.

ΠšΡ€ΠΎΠΌΠ΅ Ρ‚ΠΎΠ³ΠΎ, Π½Π° Ρ„ΠΎΡ€ΠΌΠ΅ ΠΏΡ€ΠΈΡΡƒΡ‚ΡΡ‚Π²ΡƒΡŽΡ‚ Π΄Π²Π΅ ΠΊΠ½ΠΎΠΏΠΊΠΈ.

Кнопка «OК» Π²Ρ‹ΠΏΠΎΠ»Π½Π΅Π½ΠΈΠ΅ Π²Ρ‹Π±Ρ€Π°Π½Π½ΠΎΠΉ ΠΎΠΏΠ΅Ρ€Π°Ρ†ΠΈΠΈ (CommandButtonl); ΠΊΠ½ΠΎΠΏΠΊΠ° «Π‘Π»Π΅Π΄ΡƒΡŽΡ‰ΠΈΠΉ» (CommandButton2) Π²Π²ΠΎΠ΄ΠΈΡ‚ ΠΎΡ‡Π΅Ρ€Π΅Π΄Π½ΠΎΠΉ элСмСнт.

Рисунок 3 — запущСнная ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ° Рисунок 4 — Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚ выполнСния ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌ

3. РСализация ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ½ΠΎΠ³ΠΎ модуля

3.1 Код ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹

Dim s, a (100) As String

Dim i, n, m, k, j As Integer

Private Sub CommandButton1_Click ()

n = TextBox1. Text

i = 1

Label1.Caption = «Π’Π²Π΅Π΄ΠΈΡ‚Π΅ элСмСнт «& i

CommandButton1.Enabled = False

TextBox1.Text = «»

If Val (n) <> 0 Then

Else

MsgBox «ΠΠ΅ΠΊΠΎΡ€Ρ€Π΅ΠΊΡ‚Π½ΠΎΠ΅ число элСмСнтов», vbCritical, «ΠžΡˆΠΈΠ±ΠΊΠ° Π²Π²ΠΎΠ΄Π°»: End

End If

CommandButton2.Enabled = True

End Sub

Private Sub CommandButton2_Click ()

a (i) = TextBox1. Text

If Round (i) = Round (n) Then

CommandButton1.Visible = False

CommandButton2.Visible = False

For k = 1 To n — 1

For j = 1 To n

If a (k) = a (j) And k <> j Then

a (n + 1) = «»

For m = j To n

a (m) = a (m + 1)

Next

n = n — 1

j = k + 1

End If

Next

Next

Frame1.Visible = True

s = «»

For k = 1 To n

s = s & a (k) & ««

Next

Label2.Caption = s

Label1.Visible = False

TextBox1.Enabled = False

End If

i = i + 1

Label1.Caption = «Π’Π²Π΅Π΄ΠΈΡ‚Π΅ элСмСнт «& i

TextBox1.Text = «»

End Sub

3.2 ОписаниС ΠΈΡΠΏΠΎΠ»ΡŒΠ·ΡƒΠ΅ΠΌΡ‹Ρ… ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ΠΎΠ² ΠΈ Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΉ

Dim — ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€, ΠΈΡΠΏΠΎΠ»ΡŒΠ·ΡƒΠ΅ΠΌΡ‹ΠΉ для явного объявлСния ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½ΠΎΠΉ.

Integer — цСлочислСнный Ρ‚ΠΈΠΏ Π΄Π°Π½Π½Ρ‹Ρ….

Sub… End Sub

Начало ΠΈ ΠΊΠΎΠ½Π΅Ρ† ΠΏΡ€ΠΎΡ†Π΅Π΄ΡƒΡ€Ρ‹. ΠŸΡ€ΠΎΡ†Π΅Π΄ΡƒΡ€Π° — это ΠΏΠΎΠ΄ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ°. Она начинаСтся ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ΠΎΠΌ Sub ΠΈ Π·Π°ΠΊΠ°Π½Ρ‡ΠΈΠ²Π°Π΅Ρ‚ся ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ΠΎΠΌ End, ΠΌΠ΅ΠΆΠ΄Ρƒ ΠΊΠΎΡ‚ΠΎΡ€Ρ‹ΠΌΠΈ ΠΈ ΠΏΠΎΠΌΠ΅Ρ‰Π°Π΅Ρ‚ся ΠΊΠΎΠ΄. Π’Π°ΠΊΠΈΠ΅ ΠΏΡ€ΠΎΡ†Π΅Π΄ΡƒΡ€Ρ‹ ΠΌΠΎΠ³ΡƒΡ‚ Π²Ρ‹Π·Ρ‹Π²Π°Ρ‚ΡŒΡΡ ΠΈΠ»ΠΈ самим VBA (ΠΏΡ€ΠΎΡ†Π΅Π΄ΡƒΡ€Ρ‹ ΠΎΠ±Ρ€Π°Π±ΠΎΡ‚ΠΊΠΈ событий), ΠΈΠ»ΠΈ Π΄Ρ€ΡƒΠ³ΠΈΠΌΠΈ ΠΏΡ€ΠΎΡ†Π΅Π΄ΡƒΡ€Π°ΠΌΠΈ. ΠŸΡ€ΠΈ этом ΠΎΠ±Ρ€Π°Π±ΠΎΡ‚Ρ‡ΠΈΠΊΠΈ событий Ρ€Π΅Π°Π»ΠΈΠ·ΡƒΡŽΡ‚ΡΡ ΠΊΠ°ΠΊ ΠΏΡ€ΠΎΡ†Π΅Π΄ΡƒΡ€Ρ‹.

If… Then … Else … End If

ИсполнСниС ΠΎΠ΄Π½ΠΎΠΉ ΠΈΠ»ΠΈ Π½Π΅ΡΠΊΠΎΠ»ΡŒΠΊΠΈΡ… Π·Π°Π΄Π°Π½Π½Ρ‹Ρ… строк ΠΊΠΎΠ΄Π° Π½Π° ΠΎΡΠ½ΠΎΠ²Π°Π½ΠΈΠΈ Π½Π΅ΠΊΠΎΡ‚ΠΎΡ€ΠΎΠ³ΠΎ логичСского условия.

MsgBox (сообщСниС, ΠΊΠ½ΠΎΠΏΠΊΠΈ, Π·Π°Π³ΠΎΠ»ΠΎΠ²ΠΎΠΊ ΠΎΠΊΠ½Π°) — ΠΏΡ€ΠΎΡ†Π΅Π΄ΡƒΡ€Π° Π²Ρ‹Π²ΠΎΠ΄ΠΈΡ‚ Π½Π° ΡΠΊΡ€Π°Π½ Π΄ΠΈΠ°Π»ΠΎΠ³ΠΎΠ²ΠΎΠ΅ ΠΎΠΊΠ½ΠΎ с ΡΠΎΠΎΡ‚Π²Π΅Ρ‚ΡΡ‚Π²ΡƒΡŽΡ‰ΠΈΠΌΠΈ ΠΏΠ°Ρ€Π°ΠΌΠ΅Ρ‚Ρ€Π°ΠΌΠΈ.

ΠžΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ Ρ†ΠΈΠΊΠ»Π° с ΠΏΠ°Ρ€Π°ΠΌΠ΅Ρ‚Ρ€ΠΎΠΌ For… Next — позволяСт ΠΏΠΎΠ²Ρ‚ΠΎΡ€ΡΡ‚ΡŒ Π³Ρ€ΡƒΠΏΠΏΡƒ ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ΠΎΠ² Π·Π°Π΄Π°Π½Π½ΠΎΠ΅ число Ρ€Π°Π·. ΠŸΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½ΠΎΠΉ присваиваСтся Π½Π°Ρ‡Π°Π»ΠΎ счСтчика Ρ†ΠΈΠΊΠ»Π°, Π·Π°Ρ‚Π΅ΠΌ провСряСтся Π·Π°Π΄Π°Π½Π½ΠΎΠ΅ условиС. Если условиС «ΠΈΡΡ‚ΠΈΠ½Π°», выполняСтся Ρ‚Π΅Π»ΠΎ Ρ†ΠΈΠΊΠ»Π°, Π·Π°Ρ‚Π΅ΠΌ пСрСмСнная счСтчика Ρ†ΠΈΠΊΠ»Π° увСличиваСтся Π½Π° Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ шага ΠΈ Π΄Π°Π»Π΅Π΅ выполняСтся Ρ‚Π΅Π»ΠΎ Ρ†ΠΈΠΊΠ»Π°, Ссли условиС «Π»ΠΎΠΆΡŒ», Ρ‚ΠΎ Π²Ρ‹ΠΏΠΎΠ»Π½Π΅Π½ΠΈΠ΅ пСрСдаСтся Π½Π° ΠΈΠ½ΡΡ‚Ρ€ΡƒΠΊΡ†ΠΈΠΈ, ΡΠ»Π΅Π΄ΡƒΡŽΡ‰ΠΈΠ΅ Π·Π° Next. Π”Π°Π½Π½Ρ‹ΠΉ процСсс Π±ΡƒΠ΄Π΅Ρ‚ Π²Ρ‹ΠΏΠΎΠ»Π½ΡΡ‚ΡŒΡΡ, ΠΏΠΎΠΊΠ° счСтчик Ρ†ΠΈΠΊΠ»Π° Π½Π΅ ΡΡ‚Π°Π½Π΅Ρ‚ большС ΠΊΠΎΠ½Π΅Ρ‡Π½ΠΎΠ³ΠΎ значСния. ДосрочноС Π·Π°Π²Π΅Ρ€ΡˆΠ΅Π½ΠΈΠ΅ Ρ†ΠΈΠΊΠ»Π° осущСствляСтся с ΠΏΠΎΠΌΠΎΡ‰ΡŒΡŽ ΠΊΠΎΠΌΠ°Π½Π΄Ρ‹ Exit For.

Ѐункция Val (строка) Π²ΠΎΠ·Π²Ρ€Π°Ρ‰Π°Π΅Ρ‚ числа, содСрТащиСся Π² ΡΡ‚Ρ€ΠΎΠΊΠ΅, ΠΊΠ°ΠΊ числовоС Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ ΡΠΎΠΎΡ‚Π²Π΅Ρ‚ΡΡ‚Π²ΡƒΡŽΡ‰Π΅Π³ΠΎ Ρ‚ΠΈΠΏΠ°

4. ВСстированиС ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ½ΠΎΠ³ΠΎ модуля Рассмотрим Ρ€Π°Π±ΠΎΡ‚Ρƒ прилоТСния.

ΠŸΡƒΡΡ‚ΡŒ Π² ΠΊΠ°Ρ‡Π΅ΡΡ‚Π²Π΅ количСства элСмСнтов Π±Ρ‹Π» Π²Π²Π΅Π΄Π΅Π½ символ Π½Π΅ ΡΠ²Π»ΡΡŽΡ‰ΠΈΠΉΡΡ Ρ†Π΅Π»Ρ‹ΠΌ числом.

Рисунок 5 — Π’ΠΈΠ΄ сообщСния ΠΏΡ€ΠΈ Π½Π΅Π²Π΅Ρ€Π½ΠΎ Π²Π²Π΅Π΄Π΅Π½Π½ΠΎΠΉ строкС ΠŸΡƒΡΡ‚ΡŒ Π±Ρ‹Π» Π²Π²Π΅Π΄Π΅Π½ массив «s a d a a». Π’ Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚Π΅ Π±Ρ‹Π» ΠΏΠΎΠ»ΡƒΡ‡Π΅Π½ Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚, прСдставлСнный Π½Π° Ρ€ΠΈΡΡƒΠ½ΠΊΠ΅ 6.

Рисунок 6 — Π’ΠΈΠ΄ прилоТСния послС наТатия ΠΊΠ½ΠΎΠΏΠΊΠΈ «ΠžΠš»

Π’Π°ΠΊΠΈΠΌ ΠΎΠ±Ρ€Π°Π·ΠΎΠΌ, ΠΌΠΎΠΆΠ½ΠΎ ΡΠ΄Π΅Π»Π°Ρ‚ΡŒ Π²Ρ‹Π²ΠΎΠ΄, Ρ‡Ρ‚ΠΎ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ° Ρ€Π°Π±ΠΎΡ‚Π°Π΅Ρ‚ ΠΏΡ€Π°Π²ΠΈΠ»ΡŒΠ½ΠΎ.

Π—Π°ΠΊΠ»ΡŽΡ‡Π΅Π½ΠΈΠ΅

ΠšΡƒΡ€ΡΠΎΠ²Π°Ρ Ρ€Π°Π±ΠΎΡ‚Π° ΠΏΠΎ Ρ€Π°Π·Ρ€Π°Π±ΠΎΡ‚ΠΊΠ΅ прилоТСния (ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ½ΠΎΠ³ΠΎ модуля Π²Ρ‹ΠΏΠΎΠ»Π½Π΅Π½Π° Π½Π° ΡΠ·Ρ‹ΠΊΠ΅ программирования VBA (Visual Basic for Applications). ΠŸΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ° ΠΏΠΎΠ»Π½ΠΎΡΡ‚ΡŒΡŽ удовлСтворяСт поставлСнным трСбованиям. ΠŸΡ€Π°Π²ΠΈΠ»ΡŒΠ½ΠΎΡΡ‚ΡŒ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹ ΠΏΠΎΠ΄Ρ‚Π²Π΅Ρ€ΠΆΠ΄Π°Π΅Ρ‚ тСстированиС ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ½ΠΎΠ³ΠΎ модуля.

Бписок ΠΈΡΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Π½Π½Ρ‹Ρ… источников

Π“Π°Ρ€Π½Π°Π΅Π² Π’. А Π‘Π°ΠΌΠΎΡƒΡ‡ΠΈΡ‚Π΅Π»ΡŒ ΠΏΠΎ Π£Π’А.Π‘.-Пб., 2000.

ΠšΠΎΡ€ΠΎΠ»ΡŒ Π’. И. Visual Basic 6.0, Visual Basic for Applications 6.0. Π―Π·Ρ‹ΠΊ программирования. Москва. «ΠšΡƒΠ΄ΠΈΡ†-ΠΎΠ±Π·Π°Ρ†». 2000.

Π‘Π°Π½Π½Π° Пол ΠΈ Π΄Ρ€. Visual Basic для ΠΏΡ€ΠΈΠ»ΠΎΠΆΠ΅Π½ΠΈΠΉ (вСрсия 5) Π² ΠΏΠΎΠ΄Π»ΠΈΠ½Π½ΠΈΠΊΠ΅. Π‘Π°Π½ΠΊΡ‚-ΠŸΠ΅Ρ‚Π΅Ρ€Π±ΡƒΡ€Π³ BHV. 1997.

ΠŸΠΎΠΊΠ°Π·Π°Ρ‚ΡŒ вСсь тСкст
Π—Π°ΠΏΠΎΠ»Π½ΠΈΡ‚ΡŒ Ρ„ΠΎΡ€ΠΌΡƒ Ρ‚Π΅ΠΊΡƒΡ‰Π΅ΠΉ Ρ€Π°Π±ΠΎΡ‚ΠΎΠΉ