Основные возможности Visual Basic 6.0:

Управление множественными проектами с помощью Explorer

Использование новых сред Code Editor (Редактор кодов), в том числе Auto Quick Info (Быстрого Авто информатора)

Работа с окном Form Layout (Макета бланка) для настройки внешнего вида программы.

Изменение размеров окон и документов.

Выбор и использование функций управления Active X.

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

Быстрый запуск проекта с одной или более предопределенной формой.

Расширение возможностей Microsoft Word через автоматизацию.

Среда программирования Visual Basic содержит все необходимые инструменты для быстрого и эффективного создания мощных программ, работающих в среде Windows.

2.3 Системные требования

В данном разделе приведено описание примерных характеристик, которым должен соответствовать компьютер для того, чтобы на нём могла использоваться разработанная программа.

Таблица 5

	Декларируемые как минимальные	Рекомендуемые
Процессор	233 MHz	300 MHz или выше
Оперативная память	64 Мб RAM (могут быть ограничены некоторые возможности)	128 Мб RAM или выше
Видеоадаптер и монитор	VGA (640480)	Super VGA (800600) или выше
Свободное место на HDD	500 Кб	500 Кб или больше
Оптические накопители	CD-ROM (требуется для установки)	CD-ROM или DVD-ROM
Устройства взаимодействия с пользователем	клавиатура	клавиатура и мышь

Минимальные системные требования - это набор условий, необходимых для возможности запуска и работы программного продукта. Однако, наличие минимальных системных требований не отменяет возможность запуска ПО на компьютерах, которые по характеристикам слабее минимальных.

Рекомендуемые системные требования - набор характеристик, подразумевающих оптимальную работу большей части возможностей продукта. Однако, даже если компьютер и подходит под рекомендуемые системные требования, это не значит высокой производительности ПО, например, в некоторых играх невозможно играть на максимальных настройках графики.

2.4 Описание данных

К входным данным программы относятся:

§ мощность передатчика;

§ коэффициент усиления передающей антенны;

§ коэффициент усиления приемной антенны;

§ чувствительность приемника на данной скорости;

§ потери сигнала в коаксиальном кабеле и разъемах передающего тракта;

§ потери сигнала в коаксиальном кабеле и разъемах приемного тракта;

§ запас в энергетике радиосвязи;

§ центральная частота канала.

Выходные данные

§ суммарное усиление системы;

§ потери в свободном пространстве;

§ дальность связи.

2.5 Проектирование интерфейса

Исходя из поставленной задачи в приложении предполагается использовать следующие элементы управления.

Picture Box - отображает графическое изображение - в него будет выведен логотип программы.

Label - надпись - не предназначена для редактирования пользователем. Размещаем 10 меток для вывода пояснительных надписей.

TextBox - текстовое поле - обеспечивает редактирование текста пользователем. Размещаем 6 меток для ввода исходных данных.

CommandButton - командная кнопка - может содержать пиктограмму, надпись и подсказку. Разместим 1 кнопку для запуска алгоритма решения.

ListBox - список элементов, один или несколько из которых может быть выбран пользователем. Помещаем 3 списка - для выбора исходных данных и вывода решения.

Line - отображает в форме линии. Разместим 2 линии для разделения блоков ввода.

ComboBox Поле со списком - комбинирует в себе список со значениями и текстовое поле. Размещаем 1 элемент для вывода списка оборудования.

Приступаем к размещению на форме элементов управления. Это производится следующим образом: выбираем необходимый элемент управления, щелкаем по нему, переводим мышь на поле формы и нажав на клавишу мыши растянем пунктирный прямоугольник до нужного нам размера. Отпустив клавишу мыши увидим, что на форме появился выбранный элемент. Справа, в окне свойств мы увидим его свойства, которые при необходимости будем изменять. Имя элемента управления определяется свойством Name и задается средой программирования по умолчанию. При необходимости его можно изменить.

Вид формы показан на рис. 8.

Рис. 8 Вид формы

Для сохранения проекта выполните следующие действия:

1. В меню File (Файл) выберите команду Save Project (Сохранить проект) или нажмите кнопку Save Project на стандартной панели инструментов.

2. В открывшемся диалоговом окне Save File As список Тип файла содержит значение Form Files, указывая, что сохраняется входящая в приложение форма. Используя раскрывающийся список Папка, выберите папку, в которой будет сохранена форма, затем в поле Имя файла введите имя формы и нажмите кнопку Сохранить.

Для записи процедуры обработки событий, необходимо:

· Определить, на какое событие какую реакцию вы хотите получить

· Определить, какова именно должна быть реакция

· Описать эту реакцию в коде на BASIC

· Найти процедуру обработки событий в окне кода

· Вставить код на BASIC

Приступаем к написанию программного кода. Для этого дважды щелкаем по кнопке, событие о нажатия которой будем обрабатывать, и переходим в окно редактора.

Запустим нашу задачу в среде VB. Для этого выполним команду Start из пункта Run главного меню, либо нажмем на F5, либо щелкнем по пиктограмме Start стандартной панели инструментов:

Рис. 9

Если для текущего варианта кода мы делаем это в первый раз, то системе VB потребуется определенное время, чтобы скомпилировать наш текст (перевести его в машинные коды) и осуществить компоновку исполнимого модуля программы (подключить необходимые библиотеки с используемыми вами и системой функциями). При последующих запусках в одном сеансе работы с VB, программа будет запускаться мгновенно (если код ее не менялся).

Итак, если вдруг вы ввели код программы без ошибок, то после запуска программы на экране, поверх других окон, появляется окно нашей программы. Протестируем ее и убедимся, что она вполне работоспособена.

Последний этап - создание выполняемого (т.е. EXE) файла, то ради чего производилось проектирование. Нажимаем меню File Build [имя_проекта].exe…» сохраняем под предложенным именем и теперь можно закрыть VB и запускать EXE - файл без среды программирования.

2.6 Описание структуры программы

Процедура cmdRaschet_Click - расчет дальности действия канала связи.

Локальные переменные:

Ydb - суммарное усиление системы, тип Double;

Pt - мощность передатчика, тип Double;

Gt - коэффициент усиления передающей антенны, тип Double;

Gr - коэффициент усиления приемной антенны, тип Double;

Pmin - чувствительность приемника на данной скорости, тип Double;

Lt - потери сигнала в коаксиальном кабеле и разъемах передающего тракта, тип Double;

Lr - потери сигнала в коаксиальном кабеле и разъемах приемного тракта, тип Double;

FSL - потери в свободном пространстве, тип Double;

SOM - запас в энергетике радиосвязи, тип Double;

F - центральная частота канала, тип Double;

D - дальность связи, тип Double.

Процедура Combo1_Click - изменение списка оборудования и вывод в поля вода его параметров.

Локальные переменные:

mp - массив мощностей передатчиков, тип Double;

ma - массив мощностей антенн, тип Double.

Процедура Form_Load - инициализация списков при запуске программы.

Локальные переменные:

i - счетчик, тип Integer.

Таблица 6 Состав проекта

Наименование	Обозначение	Примечание
wifi.vbw	Файл с Desktop настройками проекта	Содержит информацию об открытых окнах и позициях их расположения
wifi.vbp	Файл проекта	Связывает все файлы из которых состоит приложение
FrmMain.frm	Файл программного модуля главной формы	Определяет функциональность главной формы, содержит вычислительные и управляющие процедуры.

2.7 Блок-схема алгоритма программы

Рис. 10

2.8 Инструкция пользователя

Установка программы производится как в отдельный каталог, так и в каталог с программами аналогичного назначения.

Чтобы начать работать необходимо:

§ открыть папку Мой Компьютер

§ выбрать диск, на котором расположена программа

§ найти папку с программой и открыть ее

§ запустить файл WIFI.EXE.

или

§ открыть окно Проводника

§ выбрать диск на котором расположена программа

§ найти папку с программой и открыть ее

§ запустить файл WIFI.EXE.

После запуска программы на экране появится окно (рис. 11).

Рис. 11 Главное окно

Окно состоит из следующих элементов:

1. списков выбора скорости передачи данных и канала;

2. раскрывающегося списка для выбора модели оборудования;

3. полей ввода данных;

4. списка вывода решения;

5. кнопки запуска процедура расчета.

Последовательность работы следующая:

§ выбрать в списках (1) и (2) необходимые параметры;

§ ввести в поля ввода (3) значения для расчета.

Нажать кнопку Расчет. Программа произведет расчет и вывод результата в окно (4).

Для выхода из программы необходимо нажать кнопку закрытия окна.

2.9 Пример выполнения программы

Для проведения тестирования программы было взято следующее оборудование - роутер ASUS WL500G:

§ мощность передатчика - 18 дБмВт;

§ мощность антенны - 5 дБи.

Мощность приемной антенны - 5 дБи.

В качестве рабочей частоты был выбран 12 канал с F = 2467 МГц, скорость 54 Mбит/с при которой чувствительность -66 дБмВт.

Потери сигнала в коаксиальном кабеле и разъемах передающего тракта - 1 дБ.

Потери сигнала в коаксиальном кабеле и разъемах приемного тракта - 1 дБ.

Запас в энергетике радиосвязи - 10 дБ.

Найдем суммарное усиление системы:

Y_дБ = P_{t, дБмВт} + G_{t, дБи} + G_{r, дБи} - P_{min, дБмВт} - L_{t, дБ} - L_{r, дБ} = 18 + 5 + 5 + 66 - 1 - 1 = 92 дБ.

FSL = Y_дБ - SOM = 92 - 10 = 82 дБ.

Дальности связи:

.

Дальность действия Wi-Fi сигнала в нашем случае будет равна 114 метрам. Запустив программу с приведенными данными, получим:

Рис. 12 Результат выполнения программы

Как видим он в точности совпал с результатами ручного счета.

Заключение

В данной работе был рассмотрен вопрос о беспроводной технологии Wi-Fi. Все аспекты, касающиеся данной темы нельзя описать в рамках работы, но основные моменты были описаны.

По материалам теоретической части мной была разработана программа на языке Visual Basic для расчета дальности действия Wi-Fi сигнала.

Нельзя не сказать, что технология Wi-Fi преследует в будущем несколько нереальные для нас пока цели. Т.е. для нашего понимания трудно представить, что когда-нибудь возможно будет, просто гуляя по городу, воспользоваться беспроводным выходом в Интернет. Не стоит также забывать о том, что беспроводная технология и технологии спутниковой передачи информации и мобильной связи это разные вещи. Также очень важно понимать, что к тому моменту, когда мы сможем в полной мере ощутить все достоинства данной технологии, в нее может быть внедрено еще много нового и полезного.

Несомненно, за технологией Wi-Fi будущее. Wi-Fi технологии становятся все более совершенными и качество их соединения и безопасность стремительно приближается к возможностям обычного, широко используемого, проводного соединения.

Список использованной литературы

1. Браун С. Visual Basic 6.0 с самого начала. - М.: Питер, 2000. -336 с.

2. Вишневский В.М., Ляхов А.И., Портной С.Л., Шахнович И.В. Широкополосные беспроводные сети передачи информации. - М.: Техносфера, 2005. ?592 с.

3. Глушаков С.В. Программирование на Visual Basic 6.0 / С.В. Глушаков, С.А. Сурядный. - М.: ООО «Издательство АСТ»; Харьков: «Фолио», 2003. -497 с.

4. Компьютерные сети. Принципы, технологии, протоколы: Учебник для вузов. /В.Г. Олифер, Н.А. Олифер. -Спб.: Питер, 2003. - 864 с.

5. Максимов Н.В., Попов П.И. Компьютерные сети: Учебное пособие. -М.: Форум: Инфра - М, 2004. - 336 с.

6. Педжман Рошан, Джонатан Лиэри. Основы построения беспроводных локальных сетей стандарта 802.11. Практическое руководство по изучению, разработке и использованию беспроводных ЛВС стандарта 802.11. -М.: Вильямс, 2010. -671 с.

7. Столлингс В. Беспроводные линии связи и сети. Пер. с англ. ?М.: Издательский дом «Вильямc», 2011. ?653 с.

8. Шахнович И. Современные технологии беспроводной связи. ?М.: Техносфера, 2010. ?493 с.

беспроводной связь сигнал программа

Приложение

Листинг программы

Option Explicit

Private Sub cmdRaschet_Click()

'расчет дальности действия канала связи

Dim Ydb As Double 'суммарное усиление системы

Dim Pt As Double 'мощность передатчика

Dim Gt As Double 'коэффициент усиления передающей антенны

Dim Gr As Double 'коэффициент усиления приемной антенны

Dim Pmin() 'чувствительность приемника на данной скорости

Dim Lt As Double 'потери сигнала в коаксиальном кабеле и разъемах передающего тракта

Dim Lr As Double 'потери сигнала в коаксиальном кабеле и разъемах приемного тракта

Dim FSL As Double 'потери в свободном пространстве

Dim SOM As Double 'запас в энергетике радиосвязи

Dim F() 'центральная частота канала

Dim D As Double 'дальность связи

Pmin = Array(-66, -71, -76, -80, -83, -85, -86, -87) 'инициализация массивов

F = Array(2412, 2417, 2422, 2427, 2432, 2437, 2442, 2447, 2452, 2457, 2462, 2467, 2472, 2484)

Pt = CDbl(Text1.Text) 'чтение данных из полей ввода

Gt = CDbl(Text2.Text)

Gr = CDbl(Text3.Text)

Lt = CDbl(Text4.Text)

Lr = CDbl(Text5.Text)

SOM = CDbl(Text6.Text)

List3.Clear 'очистка списка вывода

Ydb = Pt + Gt + Gr - Pmin(List1.ListIndex) - Lt - Lr 'расчет

FSL = Ydb - SOM

D = 10# ^ (FSL / 20 - 33 / 20 - Log(F(List2.ListIndex)) / Log(10))

'вывод решения

List3.AddItem («Суммарное усиление системы») 'добаляем данные

List3.AddItem («Ydb=« + Format(Ydb, «0 дБ»))

List3.AddItem («Потери в свободном пространстве») 'добаляем данные

List3.AddItem («FSL=« + Format(FSL, «0 дБ»))

List3.AddItem («Дальность связи») 'добаляем данные

List3.AddItem («D=« + Format(D, «0.000 км») + «=« + Format(1000 * D, «0 м»))

End Sub

Private Sub Combo1_Click()

'изменение списка оборудования

Dim mp() 'массив мощностей передатчиков

Dim ma() 'массив мощностей антенн

mp = Array(18, 17, 19.5, 18, 15, 16, 20, 19, 17, 14, 10, 0) 'зполнили массивы

ma = Array(5, 5, 6, 5, 4, 5, 7, 6, 5, 3, 2, 0)

Text1.Text = Format(mp(Combo1.ListIndex)) 'вывод параметров передатчика в строки ввода

Text2.Text = Format(ma(Combo1.ListIndex))

End Sub

Private Sub Form_Load()

'инициализация списков

Dim i As Integer 'счетчик

List1.Clear 'очистка списка скоростей

List1.AddItem («54») 'добаляем данные

List1.AddItem («48»)

List1.AddItem («36»)

List1.AddItem («24»)

List1.AddItem («18»)

List1.AddItem («12»)

List1.AddItem («9»)

List1.AddItem («6»)

List1.ListIndex = 0

List2.Clear 'очистка списка каналов

For i = 1 To 14

List2.AddItem (i) 'добаляем данные

Next

List2.ListIndex = 0

Combo1.Clear 'очистка списка оборудования

Combo1.AddItem («ASUS WL500G»)

Combo1.AddItem («ZyXEL P-660HN Lite EE»)

Combo1.AddItem («ASUS RT-N16»)

Combo1.AddItem («ASUS RT-N65U»)

Combo1.AddItem («TP-LINK TL-WR720N»)

Combo1.AddItem («ASUS RT-N14U»)

Combo1.AddItem («TP-LINK TL-MR3220»)

Combo1.AddItem («D-Link DIR-140L»)

Combo1.AddItem («D-link DIR-815»)

Combo1.AddItem («D-link DIR-632»)

Combo1.AddItem («TP-LINK TL-WR741ND»)

Combo1.AddItem («другой»)

Combo1.ListIndex = 0

End Sub

Размещено на Allbest.ru

...