Объявление
Желаете разместить объявление в рассылке или у вас интересная новость, тогда пишите, рассмотрим.
Тематика, не обязательно программирование - новости, юмор, интересное, статьи на любую тему.
В гостевой было замечание многие ссылки не работают -
особенно на статьи так что ж вы молчите напишите на почту и
я буду проверять - с какой страницы на какую нет перейти.
А так ошибки и останутся ошибками
У кого все нормально работает - к вам большая просьба
напишите
мне нужно понять у какого процента посетителей сайт работатет не коректно
Задайте ваш вопрос и отвечайте если знаете ответ на другие!
Уроки VB
Следующий урок в следующем выпуске
Урок № 13. Управляющие структуры
Этот раздел посвящён операторам, которые предназначены для управления
процессом выполнения всех остальных исполняемых операторов Visual Basic.
Такие классические структуры, как условные операторы и операторы цикла,
имеются во всех процедурных языках программирования, имеются они и в Visual
Basic.
Примечание: Здесь бы хотелось заметить, что управляющие структуры
мы тоже будем называть операторами. Операторы, рассмотренные на предыдущем
уроке используются в выражениях. А операторы рассматриваемые в этом уроке
предназначаются для управления вычислением этих выражений (в документациях
такие операторы называются - Statement). Важно понимать различие между
этими операторами.
Условный оператор If...End If
Этот оператор вы уже встречали в восьмом уроке. Он необходим для принятия
решений, нужно ли выполнять то или иное действие или нет. Другими словами
если Логическое_выражение
истинно, то Оператор
выполнится. Если ложно, то выполнение не произойдёт.
If
Логическое_выражение Then Оператор
или сложнее
If Логическое_выражение Then
    Группа_операторов
End If
В первом случает оператор может быть только один. Во втором сколько угодно
(в том числе и один).
Пример:
If
(a = b) And (c <> d) Then
    b = d
    a = 20
End If
Скобки здесь не обязательны, но они повышают читабельность кода.
Функции Visual Basic
Я попытаюсь рассмотреть все
Функция CSng
CSng(Expression)
Функция CSng(Conversion to Single) используется для приведения выражения в тип Single
Возвращаемое значение
Функция CSng возвращает значение Expression, преобразованное в числовой длинный тип данных с плавающей запятой обычной точности Single.
Если числовое значение Expression по абсолютной величине меньше минимального допустимого значения диапазона Single, CSng возвращает 0.
Если числовое значение Expression по абсолютной величине превышает максимальное допустимое значение Single, генерируется ошибка стадии выполнения Overflow.
Если Expression имеет тип данных String, то он должен быть числом, иначе возникает ошибка стадии выполнения Type mismasth.
Если число знаков в дробной части Expression выходит за пределы допустимого значения диапазона Single, CSng усекает ее
Параметры
Expression
Любое числовое выражение или строка, представляющая число от -3.402823E8 до -1.401298E-45 для отрицательных значений и от 1.401298E-45 до 3.402823E8 для положительных значений
Пример
Dim A, retval
A=1234.56789 ' A имеет тип Double
retval =CSng(A)' преобразуем в Single
Debug.Print retval ' получаем 1235.568