Зараз обговорюють

"Тобто є ряд завдань, які взагалі без рекурсії не наважуються."  - це як розуміти? Перефразуй, будь ласка. 

виправив, йшлося про те що деякі завдання можна вирішити лише при використанні рекурсії

Спасибі дуже корисна стаття

А ще щось планується подібного найближчим часом?


Дякую за підтримку, радий що Вам сподобалось!

Так маю вже майже дороблений проект по управлінні Audio файлом, на заміну стандартним клавішам управління HTML5, але ще не встиг відтестувати програвання файлів з інтернету, поки лише локально працює

Надіюсь найближчим часом дороблю й закину

Рахунки

webmoneyeur - E385818210641
usd - Z304643423050
uah - U354026817492
rub - R301704373231easypay80002677bitcoin1F5HRGroUtEQW9HBNbeew8iKh5KQ8vJxzw

Зворотній зв'язок

Для покращення роботи сайту надсилайте свої зауваження:
mailЗауваження
mailПропозиція

Статистика

UkrNET - поисково-информационный ресурс

VBA : Отримання відомостей про змінну (RTTI)

Є такий термін RTTI - run-time type information. Для отримання відомостей про змінну, доступну під час виконання програми. Іноді ця інформація виявляється просто необхідною. У VBA є тип даних Variant, який може приймати значення будь-якого типу за винятком призначеного для користувача. Ось наприклад так:

Dim myStr As String
Dim myInt As Integer
Dim myVar As Variant
    myStr = "Hello World!"
    myInt = 123
    myVar = myStr
    myVar = myInt

Щоб не виникло помилок при конвертації, можна спочатку перевіряти значення на можливість конвертації за допомогою функцій IsNumeric() і IsDate(). Для перевірки на відповідність спеціальним значенням можна використовувати функції IsArray(), IsEmpty(), IsError(), IsMissing(), IsNull() і IsObject(). Всі ці функції повертають True або False залежно від результатів перевірки переданого їм значення.

TypeName

Variant можна використовувати як аргумент процедури. У цьому випадку може знадобитися інформація про те, що ж знаходиться у змінній в даний момент. Для цього є функція TypeName(), яка поверне рядок з ім'ям типу змінної. Ось приклад її використання:

Dim myStr As String
Dim myInt As Integer
Dim myVar As Variant
    myStr = "Hello World!"
    myInt = 123
    myVar = myStr
    Debug.Print TypeName(myVar)
    myVar = myInt
    Debug.Print TypeName(myVar)

IsArray

дозволяє перевірити, чи є змінна масивом.

Dim myArr(5) As String
    If IsArray(myArr) Then Debug.Print "Array"

IsEmpty

перевіряє, чи була змінна ініціалізована. Спробуйте запустити код, наведений нижче, а потім розкоментуйте рядок.

'Dim myStr As String
    If IsEmpty(myStr) Then Debug.Print "Змінну не ініціалізовано!"

IsDate

перевіряє чи можна перетворити змінну до типу дати. При виконанні наведеного нижче коду повідомлення з'явиться тільки в першому випадку.

Dim myDate As String
    myDate = "01.01.2001"
    If IsDate(myDate) Then Debug.Print myDate & " є датою"
    myDate = "41.01.2001"
    If IsDate(myDate) Then Debug.Print myDate & " є датою"

IsNumeric

перевіряє, чи можна перевести рядок в число:

Dim myStr As String
    myStr = "Hello World!"
    If IsNumeric(myStr) Then Debug.Print myStr & " можна конвертувати у число"
    myStr = "2016"
    If IsNumeric(myStr) Then Debug.Print myStr & " можна конвертувати у число"

IsObject

перевіряє, чи є змінна об'єктом

Dim myObj As Object
    Set myObj = Cells(1, 1)
    If IsObject(myObj) Then Debug.Print "Це об'єкт"

IsNull

перевірка на порожнє значення. При виконанні наведеного нижче коду повідомлення з'явиться тільки в першому випадку.

Dim myStr As Variant
    myStr = Null
    If IsNull(myStr) Then Debug.Print "Порожнє значення"
    myStr = ""
    If IsNull(myStr) Then Debug.Print "Порожнє значення"

IsEmpty

перевірка на порожнє значення. При виконанні наведеного нижче коду повідомлення з'явиться тільки в першому випадку. Dim myStr As Variant If IsEmpty(myStr) Then Debug.Print "Порожня змінна!" myStr = "" If IsEmpty(myStr) Then Debug.Print "Порожня змінна!"

IsError

перевірка вираження, чи становить вона помилку

Dim a As Variant, b As Variant
    a = 10
    b = "a"
    ThisWorkbook.Sheets(1).Cells(1, 1).Formula = "=" & a & "/" & b
    If IsError(ThisWorkbook.Sheets(1).Cells(1, 1)) Then Debug.Print "Помилка у виразі!"

IsMissing

перевірка переданого аргументу. Якщо IsMissing повертає True аргументу, використання відсутнього аргументу в іншому коді може викликати певну користувачем помилку. При виконанні наведеного нижче коду в першому випадку ми отримаємо Null так як в нас буде відсутній передаваний аргумент, а в другому випадку подвоєний аргумент 2.

Sub Test()
    Debug.Print ReturnTwice()
    Debug.Print ReturnTwice(2)
End Sub
Function ReturnTwice(Optional A)
    If IsMissing(A) Then
        ReturnTwice = Null
    Else
        ReturnTwice = A * 2
    End If
End Function 

view301like0dislike0 avatard_l4w clock 2016-09-22 21:04

Коментарі:



Для даної статті відсутні коментарі

Про нас

"Programmers World" розроблено з метою полегшення в освоєнні навичок програмування, та поширення матеріалів з сфери ІТ Українською мовою.

Кожен бажаючий може безкоштовно користуватися ресурсами сайту, щоб:

- Вивчати теоретичні аспекти мов програмування

- Переглядати практичне застосування теорії при виконанні різних міні проектів з відкритим кодом

- Розміщати свої завдання на форумі для допомоги в їх реалізації, або готового коду який може бути корисний іншим користувачам

- Спілкуватись з іншими користувачами та обмінюватись досвідом

Сайт функціонує на безопланій основі та ентузіазмі розробника, якщо Ви бажаєте долучитись до розвитку даного проекту то можете пожертвувати кошти на рахунки розміщені в блоці "Допомога сайту".

Сайт

Зареєстровані користувачі можуть скористатися системою діалогів, в профілі користувача, для отримання потрібної інформації. Написати!

Також Ви можете використати форми відправки Зауважень та Пропозицій.


Електронна пошта

Ви можете звертатись на нашу поштову скриньку site.programmersworld@gmail.com

www.000webhost.com