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

Программирование на Visual Basic, VB .NET и VBA

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

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

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

  Декабрь 2005   →
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
12.12.2005
16:40:28
20:45:07
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
Автор
BiT

Статистика

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

По страницам сайта Visaul PROGS


Информационный Канал Subscribe.Ru
Visual PROGS
[ MP3 плейеры ] [ CD плейеры ] [Сотовые трубки ] [Диктофоны ]
[Карманные ПК ] [ Фотоаппараты ] [ Видеокамеры ] [ Радио ] [ Ноутбуки ]

..........................................................................................................................
[ Главная ] [ Статьи ] [ Для новичков ] [ Примеры ] [ Программы ] [ Книги ] [ Уроки ] [ Разное ]
..........................................................................................................................

Выпуск 15
По страницам сайта Visaul PROGS
или Изучение VISUAL BASIC


Теперь 269 человек подписалось на рассылку.

ВНИМАНИЕ - всем у кого есть свои сайты или странички!
Я создаю раздел ::друзья::
Разместив у себя ссылку на мой сайт и прислав мне письмо след. содержания:
Имя владельца
Название проекта
Мой сайт посвящен этому
Ссылка на ваш сайт - здесь
У вас есть шанс попасть в начало списка, т.к. пока он пуст,
вы можете оказаться под номером 1.2.3.
Следовательно, шанс что на ваш сайт пройдут посетители будет больше.
Письма будут сортироваться по времени прихода письма ко мне
Конкурс открыт!


Объявление Желаете разместить объявление в рассылке или у вас интересная новость, тогда пишите, рассмотрим.
Тематика, не обязательно программирование - новости, юмор, интересное, статьи на любую тему.


Также раздел статьи пополнился несолькими единицами.
И самое главное появился новый раздел - Готовые кусочки программы на разные случаи жизни!
Раздел книги открыт, советую посмотреть.
Выложил Замечательное пособие.
Microsoft Agent — это набор программных сервисов.
Раздел Программы наконец все в норме можете качать.

http://bibliotech.narod.ru -= Библиотека электронных книг, фантастики и киберпанка =-

Уроки VB
Следующий урок в следующем выпуске

Урок № 10. Массивы, записи и перечисления

Массивы переменной размерности (динамические)

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

Dim fileContent (119) As Byte

Но это если файл имеет длину 120 байт. А что делать, если мы не знаем длину загружаемого файла? Определять очень большой массив, чтобы уж наверняка туда мог поместиться большой файл? Нет. Так делать нельзя. Вот здесь как раз и нужно использовать динамический массив.

Visual Basic предоставляет довольно мощные средства для работы с такими массивами. Опеределяется такой массив следующим образом:

Dim myArray () As Byte

В отличие от массивов статичных размеров, когда обращаться к элементам можно сразу после его объявления, к элементам динамического массива сразу обращаться нельзя, т.к. они ещё не инициализированы. Для начала нужно указать его новую размерность. Для это в VB есть оператор ReDim. Работает он следующим образом:

ReDim myArray (4)

Теперь массив myArray имеет одну размерность с индексами от 0 до 4 (т.е. всего 5 элементов). Теперь к такому массиву можно обращаться точно так же, как и к статичному. Если в дальнейшем возникнет необходимость снова изменить размерность массива, можно ещё раз использовать ReDim.

Но! Здесь есть подводный камень! Давайте рассмотрим маленький примерчик:

Dim myLong As Long
Dim myArray() As Long ' объявляем массив

ReDim myArray (2) ' одна размерность [0,1,2]
myArray (1) = 234 ' присваиваем второму элементу чило 234
myLong = myArray (1) ' сохраняем его в переменной myLong

ReDim myArray (3) ' снова меняем размерность-теперь [0,1,2,3]
myLong = myArray (1) ' снова пытаемся сохранить второй элемент

На последней строке, переменной myLong присвоится 0 вместо 234! Это происходит потому, что оператор ReDim заново инициализирует (сбрасывает) все элементы массива к значению по умолчанию (как помните, для чисел - это 0, для строк ""). Но как же быть, если мы хотим изменить размеры массива, сохранив все старые элементы? Для этого нужно после оператора ReDim поставить слово Preserve. Примерно так:

ReDim Preserve myArray (3) ' сохраняем старые элементы
myLong = myArray (1) ' всё в порядке

Теперь всё в порядке.

продолжение урока в следующем выпуске...

Арифметические операторы
Следующий оператор в следующем выпуске

Логические операторы

Это самая интересная группа оператором. При программировании вы обязаны знать их работу и применение (причём не только на Visual Basic).

В Visual Basic их 6 штук. Рассмотрим каждый оператор подробно.

оператор Or

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

Синтаксис:

результат = выражение1 Or выражение2

результат обязателен; Любая числовая (включая Boolean) переменная
выражение1 обязательно; Любое выражение
выражение2 обязательно; Любое выражение

Замечания:

Следующая таблица показывает как работает оператор Or:

Если выражение1 =
, а выражение2 =
То результат =
True True True
True False True
True Null True
False True True
False False False
False Null Null
Null True True
Null False Null
Null Null Null

Оператор Or используется для установки определённых битов числа. Для битов оператор Or работает следующим образом (смотреть слева направо)

0 0 0
0 1 1
1 0 1
1 1 1

Результат выделен жирным шрифтом.

Примеры:

Dim A, B, C, D, MyCheck
A = 10: B = 8: C = 6: D = Null
MyCheck = A > B Or B > C ' Возвратит True.
MyCheck = B > A Or B > C ' Возвратит True.
MyCheck = A > B Or B > D ' Возвратит True.
MyCheck = B > D Or B > A ' Возвратит Null.
MyCheck = A Or 5 ' Возвратит 15:

Давайте последний пример рассмотрим подробнее. Число 10 представляется в виде битов следущим образом (как тетрада, т.е. 4 бита):

1010

А число 5:

0101

В результате работы оператора Or, согласно вышеприведённой таблице мы получим:

1111

Т.е. 15. Как видите, оператор Or очень легко и удобно использовать не только в выражениях сравнения, но и для установки определённых битов числа.

Функции Visual Basic
Я попытаюсь рассмотреть все

Функция Choose

Choose(Index,item1 [, item2 [ ,..., [ itemN]] )

Функция Choose выполняет выборку элемента по его порядковому номеру(индексу) в списке элементов, возвращая значение выбранного элемента

Возвращаемое значение

Функция Choose возвращает значение Null, если значение Index меньше 1 или больше числа элементов в списке. Если значение Index не целое число, то перед обработкой списка оно округляется до ближайшего целого числа

Параметры
Index
Обязательный аргумент представляет собой выражение типа Single
item1
Обязательный аргумент представляет собой список типа Variant возвращаемых элементов, разделенных запятой
Item2,...itemN
Необязательные аргументы аналогичны аргументу item1
Пример Dim retval retval = Choose(4, "банан", "ананас", "баунти","пепси", "сникерс") Debug.Print retval ' новое поколение выбирает пепси Категория
Функции загрузки данных

Если вы хотите задать вопрос пишите-------------> Мне нужна помощь

[Квесты] [Video MPEG4] [Софт] [Симуляторы] [Энциклопедии] [Аркады] [MP3] [Экшн] [Ролевые игры] [Стратегии] [Спорт] [DVD Video]
...:::Design by Mystf0rse in 2005 year:::...
Subscribe.Ru
Поддержка подписчиков
Другие рассылки этой тематики
Другие рассылки этого автора		 Подписан адрес:
Код этой рассылки: comp.soft.prog.visualprog
Архив рассылки		 Отписаться
Вспомнить пароль
В избранное