Отправляет email-рассылки с помощью сервиса Sendsay

Подробный обзор функций, операторов и объектов Visual Basic6

Рассылка закрыта

При закрытии подписчики были переданы в рассылку "Visual Basic для новичков и профессионалов" на которую и рекомендуем вам подписаться.

Вы можете найти рассылки сходной тематики в Каталоге рассылок.

←   Апрель 2004   →
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
Автор
SBJoker

Статистика

3.003 подписчиков
-6 за неделю
←   Все выпуски   →

Обзор функции FileDateTime и небольшая статья про использование собственных функций и процедур.


Информационный Канал Subscribe.Ru

"Подробный обзор функций, операторов и объектов Visual Basic6"
Выпуск 16

Приветствую всех кто подписался на эту рассылку! Ведущий рассылки - SBJoker

Сайт рассылки -  "Колизей"

 

.:: Сегодня, в рассылке ::.

1. О том как использовать собственные функции
2. Функция FileDateTime

О том как использовать собственные функции

По этой теме мне приходит множество вопросов, поэтому немного отвлечёмся от встроенных функций и поговорим о собственных.

Код собственных функций должен располагаться между следующий строчек:

[Private\Public] [Sub\Function] [имя функции] ( [параметр 1], [параметр 2] , ....., [параметр n] ) As [тип данных]

End [Sub\Function]

Теперь по порядку: Private или Public - обозначает зону видимости этой функции, т.е. Private означает что функция будет доступна только в в коде той формы или модуля где была описана. Public - функция доступна за пределами родительского окна. 

Sub - наша функция не будет возвращать результат выполнения и теперь мы будем её называть процедура (аналог оператора). Function - наша функция будет возвращать результат выполнения и так и будет называться функцией.

С тем как назвать функцию, думаю, проблем не будет. Главное не называть уже существующими именами функций, переменных, объектов и операторов.

В круглых скобках указываем параметры необходимые нашей программе, если таковых не надо, то в скобках ничего не пишем (скобки должны быть обязательно!). Параметры должны соответствовать правилам объявления переменных: [имя параметра] As [тип данных]. В функциях можно использовать необязательные параметры, для этого перед именем параметра пишется ключевое слово Optional, а после указания типа данных можно установить значение по-умолчанию, например:

Public Function MyFunk( number As Integer, Optional period As Single = 0.5 ) As Integer
'код функции
End Function

Естественно, последняя строчка должна быть в соответствии с началом, т.е. Функция должна завершаться как End Function, а процедура как End Sub

Внутри функции её параметры считаются переменными. Будьте внимательны, без особой необходимости не изменяйте данные хранящиеся в параметрах функции, т.к. это может повлиять на переменные которые вы передавали в функцию в качестве параметров.

С процедурами всё ясно, а вот как сделать чтобы функция возвращала результат работы? Очень просто, внутри её кода просто присвойте имени функции нужные данные, и она их вернёт при выполнении.

Давайте для закрепления знаний, напишем простую функцию переводящую градусы в радианы. Это функция будет полезна, т.к. все тригонометрические функции VB принимают в качестве параметра переменную содержащую угол в радианах, а у нас скорее всего будет известен угол в градусах.

Кто хорошо учился в школе наверняка помнит эту формулу: RAD=DEG*3.14/180

Function DegToRad(degrees As Single)As Single

DegToRad=degrees * 3.14 / 180

End Function

В коде программы теперь можно использовать эту функцию:

.....
Mysin= sin( DegToRad( 45 ) )
.....

Функция FileDateTime
Синтаксис: FileDateTime ( path )
Параметры: path - полный путь к файлу
Возвращаемое значение: дата и время последнего изменения файла.
Применение: везде где нужно знать дату последнего изменения файла, например обновление программы через Интернет или инсталлятор, определяющий какие файлы более новые..
Пример: msgbox "Дата и время последнего изменения файла 'pagefile.sys': " &  FileDateTime("C:\pagefile.sys")
Результат: Дата и время последнего изменения файла 'pagefile.sys': 11.04.2004 10:15:27

  Вы так же можете присылать свои советы на адрес указанный ниже.

.:: Интересные рассылки ::.

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

Подписаться
 
ZipSites.ru - интересные сайты одним архивом
На сайте предоставлены для скачивания "одним файлом" различные популярные сайты: Soobcha.ru, Cooking.ru, Copperfield.ru, Aferizm.ru, Countries.ru и многие другие. Проект экономит не только трафик и деньги, но и самое дорогое,что у нас есть - ВРЕМЯ!
Подписаться на рассылку одним кликом


Если есть какие-либо пожелания, предложения или неточности в рассылке пишите: sbjocker@orel.ru
Ведущий рассылки - SBJoker.
 

http://subscribe.ru/
E-mail: ask@subscribe.ru 		Отписаться
Убрать рекламу

В избранное