Как Найти, что Значением Официального набора документов является Число или Строка?

Примечание : Учитывая мнения, которые получает этот Вопрос, я решил опубликовать способ, который я выбрал в качестве решения. Это НЕ ответ на мой вопрос. (Следовательно, принятый ответ остается принятым)

В то время я использовал SVProgressHUD , поскольку его было очень просто интегрировать и использовать.

Все, что вам нужно сделать, это просто перетащить папку SVProgressHUD / SVProgressHUD в ваш проект. (Вы также можете выбрать кокоаподы ИЛИ карфаген)

В Objective-C:

[SVProgressHUD show]; // Show
[SVProgressHUD dismiss]; // Dismiss

В Swift:

SVProgressHUD.show() // Show
SVProgressHUD.dismiss() // Dismiss

Кроме того, Показать и скрыть HUD необходимо выполнить в главном потоке . (В частности, вам нужно это, чтобы скрыть HUD в некотором закрытии в фоновом режиме)

Например:

dispatch_async(dispatch_get_main_queue(), ^{
    [SVProgressHUD dismiss]; // OR SHOW, whatever the need is.
});

Существуют дополнительные методы для отображения пользовательских сообщений с HUD, показывая успех / неудачу на короткое время и автоматическое увольнение.

MBProgressHUD по-прежнему остается хорошим выбором для разработчиков. Просто я нашел SVProgressHUD для своих нужд.

1
задан Deanna 8 May 2012 в 13:52
поделиться

4 ответа

Посмотрите библиотеку функций Visual Basic 6 . Есть функции, которые могут помочь вам определить базовый тип значения.

Их довольно много, но они могут оказаться полезными:

1
ответ дан 3 September 2019 в 01:25
поделиться

Вы можете использовать функцию IsNumeric , доступную в VB6.

0
ответ дан 3 September 2019 в 01:25
поделиться

На основании этой статьи , если rsCardEvent является набором записей ADO, вы можете проверить свойство Тип . Примерно так:

    Select Case rsCardEvent(4).Type
        Case adBSTR, adChar, adVarChar, adWChar, _
           adVarWChar, adLongVarChar, adLongVarWChar
            ' It is a string '
        Case Else
            ' It is not a string '
    End Select
1
ответ дан 3 September 2019 в 01:25
поделиться

Как насчет:

If TypeName(rsCardEvent(4).Value) = "String" then

http://msdn.microsoft.com/en-us/library/5422sfdf.aspx

0
ответ дан 3 September 2019 в 01:25
поделиться