Отправляет 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 плейеры ] [Сотовые трубки ] [Диктофоны ]
[Карманные ПК ] [ Фотоаппараты ] [ Видеокамеры ] [ Радио ] [ Ноутбуки ]

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

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


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

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


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


В гостевой было замечание многие ссылки не работают - особенно на статьи так что ж вы молчите напишите на почту и я буду проверять - с какой страницы на какую нет перейти. А так ошибки и останутся ошибками

У кого все нормально работает - к вам большая просьба напишите мне нужно понять у какого процента посетителей сайт работатет не коректно


[Гостевая] [Форум] [Друзья] [Архив рассылки] [Архив новостей] [Пособие] [Agent] [Карта сайта]
 

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

Урок № 11. Выражения

Итак, рассмотрим каждый случай подробно:

  1. Здесь, переменной типа Boolean - bRes присваивается значение выражения (c > b). Т.е. Visual Basic сравнивает эти переменные, и смотрит, c > b? Если да, то значение этого выражения сравнения - True. Если же нет, то False.
  2. То же самое, только bRes будет содержать значение False, т.к. c больше b, а не меньше, как указано в выражении.
  3. Здесь происходит сравнение значений переменных a и c. Т.е. a больше или равно c? В нашем случае a = 234, c = 1000, значит не больше и не равно (меньше). bRes будет содержать False.
  4. b сравнивается с числом 4. Вспомните, ведь 4 - это тоже выражение, со значением 4! Т.к. b > 4, то bRes = False.
  5. Здесь также происходит сравнение переменной b с числом, 5. Но на этот раз одно из условий выполнени, а именно b = 5! Значит bRes = True.
  6. Очевидно, что b <> a. Стало быть bRes должно быть равно True!? Да, так оно и есть... ;)
  7. Обратите внимание на этот пример. После выполнения этой строчки, bRes будет равно True! Здесь выражение Not (a = b) вычисляется следующим образом: сначала Visual Basic сравнивает значения a и b. После того, как VB убедится в том, что a <> b (т.е. False), он вычисляет выражение:
    Not (False). Оператор Not - это булев оператор отрицания. Он инвертирует значение. В данном случае из False получается True. (на более низком уровнем, могу добавить, что оператор Not инвертирует все биты операнда, в данном случае, т.к. False в VB - это 0, а True - FFFF, то значение выражения - True).
  8. Здесь ничего особенно не происходит. bRes = False. Почему? Пусть это будет вашим домашним заданием :).

Ну и последний пример, который иллюстрирует применение выражений сравнения. Сделаем так, чтобы переменной a присвоилось значение 234, если
c = b, и 100, если c <> b:

If c = b Then a = 234
If c <> b Then a = 100

А можно так:

If c = b Then
    a = 234
End If

If c <> b Then
    a = 100
End If

Оба этих варинта абсолютно эквивалентны, но теряется наглядность. Лучше использовать следующий вариант:

If c = b Then
    a = 234 ' строчка #1
Else
    a = 100 ' строчка #2
End If

Здесь конструкция If выполнит строчку #1 тогда и только тогда, когда c будет равно b. Если же они не будут равны, то выполниться строчка #2. Подробнее всё это мы рассмотрим далее.

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

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

оператор Imp

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

Синтаксис:

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

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

Замечания:

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

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

Для битов оператор Imp работает следующим образом (смотреть слева направо)

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

Примеры:

Dim A, B, C, D, MyCheck
A = 10: B = 8: C = 6: D = Null
MyCheck = A > B Imp B > C ' Возвратит True.
MyCheck = A > B Imp C > B ' Возвратит False.
MyCheck = B > A Imp C > B ' Возвратит True.
MyCheck = B > A Imp C > D ' Возвратит True.
MyCheck = C > D Imp B > A ' Возвратит Null.
MyCheck = B Imp A ' Возвратит -1

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

Функция Command

Command

Функция Command применяется для запуска приложения с различными опциями с использованием командной строки

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

Функция возвращает параметры командной строки,указанные в строке запуска программы(в окне запуска программы или в окне свойств ярлыка в поле Объект

 Пример 
' Пример передачи аргументов командной строки в функцию,
' которая возвращает их в переменной типа Variant,
' содержащей массив
Function GetCommandLine(Optional MaxArgs)
   ' Объявляем переменные
   Dim C, CmdLine, CmdLnLen, InArg, I, NumArgs
   ' Проверка наличия MaxArgs
   If IsMissing(MaxArgs) Then MaxArgs = 10
   ' Задание корректной размерности массива
   ReDim ArgArray(MaxArgs)
   NumArgs = 0: InArg = False
   ' Получаем аргументы командной строки
   CmdLine = Command()
   CmdLnLen = Len(CmdLine)
   ' Анализ всех символов командной строки
   For I = 1 To CmdLnLen
      C = Mid(CmdLine, I, 1)
      ' Проверка наличия пробела или табуляции
      If (C < > " " And C < > vbTab) Then
         ' пробел и табуляция не обнаружены
         ' Проверка наличия аргумента
         If Not InArg Then
         ' Начало нового аргумента
         ' Проверка количества аргументов
            If NumArgs = MaxArgs Then Exit For
            NumArgs = NumArgs + 1
            InArg = True
         End If
         ' Добавляем символ к текущему аргументу
         ArgArray(NumArgs) = ArgArray(NumArgs) & C
      Else
         ' Если найден символ пробела или табуляции,
         ' устанавливаем флаг InArg flag в False
         InArg = False
      End If
   Next I
   ' Меняем размер массива
   ReDim Preserve ArgArray(NumArgs)
   ' Возвращает массив в качестве имени функции
   GetCommandLine = ArgArray()
End Function
Категория
Функции обработки системных параметров

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