Рассылка закрыта
При закрытии подписчики были переданы в рассылку "Программирование на Visual Basic/Visual Studio и ASP/ASP.NET" на которую и рекомендуем вам подписаться.
Вы можете найти рассылки сходной тематики в Каталоге рассылок.
Программирование на Visual Basic 6.0 в примерах.
| Информационный Канал Subscribe.Ru |
Здравствуйте!!!
Выпуск – 3:
Переменные – 2(Продолжение)
Привет всем, кто принялся изучать Visual Basic. Мы уже прошли с вами два урока и этот
можно сказать экстренный. Вы знаете, что рассылка выпускается каждые две недели, но эту я выпустил с перерывом в два дня(!), т.к. в прошлом выпуске я вам дал не полное
представление
о переменных в Visual
Basic
и обещал закончить с ними в этом выпуске.
Как всегда я приведу пример использования
переменных в виде исходного кода программ.
В следующих рассылках мы будем изучать
элементы формы, т.к. мы изучили только
кнопку и изучим Textbox
и Label
в этом выпуске. Программ будет
несколько, потом и дадим им названия. Выпуск,
похоже, будет немаленьким
J
Мой сайт:
www.symsoft.narod.ru email:ger@ellink.ru
Урок
- 3 Переменные
Ну,
начнём!!! Для начала познакомимся с
константами. Напомню:
Константа – это
постоянное число, т.е. число,
которое не может
меняться.
Тоже
самое и в Visual Basic, если вы
объявите переменную со значением константы,
то ни что не сможет эту переменную изменить.
Константа объявляется
так:
Const
переменная = число
То есть если мы хотим объявить число π, то нужно написать код в декларациях (на самом верху):
Const
Pi = 3.14159
И если известен
радиус, то можно найти длину круга по
формуле (L –
длина, тоже переменная, как и Radius(Радиус
круга)):
L
= 2*Pi*Radius
В общем, сейчас разберём пример
программы, использующую эту формулу. По
ходу примера мы разберем много приёмов
работы Visual
Basic.
Программа
“Length”
1.
Как всегда создаём новый проект New->
New Project-> Standard EXE.
2.
На форму перенесите Textbox (окно ввода), Button (кнопку) и Label(метку).
Разместите всё друг за другом:
3.
Задайте параметры:
Textbox:
Name:
txtRadius
Text:
(пусто)
Button:
Name:
cmdCalc
Caption:
Посчитать.
Label:
Name:
lblLenght
Caption:
(пусто)
BorderSize:
1 – FixedSingle ‘ Изменяется
вид метки.
4.
Разберём, что у нас должно
получиться: мы в поле ввода вводим цифру,
нажимаем на кнопку посчитать, и на Label
появляется сосчитанная по формуле
длина окружности.
5.
Напишем и разберём код (весь):
Dim
Radius As
Integer 'Объявляем
переменные радиуса и длины окружности
Dim
Lenght As Integer
Const
Pi = 3.14159 '
Объявление постоянного числа Pi
Private
Sub cmdCalc_Click()
Radius
= txtRadius.Text
'Считывание чисел в окне ввода
Lenght
= 2 * Radius * Pi ' Считаем…
lblLenght.Caption = Lenght
'Полученный результат выводим на Label
End
Sub
6.
Вот вроде бы и всё. С
константами покончено (пока J)
End
Да
и самое важное: параметры элементов формы в
коде определяются через точку:
элемент.параметр
В
предыдущем выпуске я не познакомил вас с
такими видами переменных : Single,
Double, Currency
(Денежная), Date, Byte
(Короткая) и знакомить
не буду J,
т.к. они нам пока совершенно не нужны и
вообще используются редко!!!
(!!!)
Можно “переобъявлять” переменные
командой ReDim:
ReDim
переменная as
тип
Объявлять
переменные можно и при помощи команд Private, Public,
Static и
Global.
Private
– то же самое, что и Dim, только это закрытая переменная.
Public
– то же самое, что и Dim.
Static
– переменная будет сохранять своё
последнее значение даже после завершения
процедуры.
Global
– переменную можно использовать на уровне
всего приложения.
ВСЁ
ЭТО МЫ БУДЕМ ИЗУЧАТЬ В ХОДЕ СЛЕДУЮЩИХ
УРОКОВ!!!!
На этом наш
урок закончен! До свидания! Ждите новых…
To
be continued…
Site:
www.symsoft.narod.ru
mailto:
ger@ellink.ru
| http://subscribe.ru/
E-mail: ask@subscribe.ru |
Отписаться
Убрать рекламу |
| В избранное | ||
