Рассчитать ли числовое значение между двумя значениями в VBScript

Несколько дней назад я нашел работу и использовать SQL МЕЖДУ проверить, что поиск параметр между двумя значениями, и я понял, что это может быть полезно в некоторых случаях даже в такой функции программный код, а не только в строке поиска по базе данных.

В конце концов, я написал функцию, которая выполняет ту же задачу с помощью VBScript.

После этого вступления ", на одном дыхании", я делаю помещения: я решил установить эту статью в стороне клиента VBScript, чтобы дать каждому шанс проверить это немедленно, но тот же код может также использоваться в ASP, чем в Visual Basic, или даже по той же логике, что я следовал, то становится очень легко написать один в PHP, Java, Javascript или другим, который, как VBScript, не имеют этой функции изначально между умолчанию.

Давайте посмотрим, код пользовательской функции между

 Функция С (MyValue, начальноеЗначение, конечноеЗначение)



    



 Если IsEmpty (MyValue), тогда



        



 Между 0 =



    



 ElseIf IsEmpty (начальноеЗначение), тогда



        



 Между 0 =



    



 ElseIf IsEmpty (конечноеЗначение), тогда



        



 Между 0 =



    



 ElseIf IsNumeric (MyValue) = ложно, то



        



 Между 0 =



    



 ElseIf IsNumeric (начальноеЗначение) = ложно, то



        



 Между 0 =



    



 ElseIf IsNumeric (конечноеЗначение) = ложно, то



        



 Между 0 =



    



 Еще



        



 Если MyValue> = начальноеЗначение И MyValue <= конечноеЗначение Затем



            



 В период с 1 =



        



 Еще



            



 Между 0 =



        



 End If



    



 End If







 End Function

Функция принимает три параметра: первый номер для оценки того, в том числе и не включая начальное значение и целевое значение, второй и третий параметр, однако, это в точности число отправления и назначения.

Затем, используя функцию следующим образом тривиально

 



 Между document.write (1, 0, 10)

 

мы проверяем, что 1 находится между 0 и 10, и, конечно, это так, то результатом будет "1" (истина).

В этом случае, однако,

 



 Между document.write (25, 0, 10)

 

получить "0" (ложно), потому что 23 не от 0 до 10.

Мы продолжаем исследовать функцию. Мы проводим серию условных тестов для проверки параметров не остались пустыми, а какие численные.

Чтобы принять или не фильтровал числовых параметров типа строка может быть использована в течение пользовательской функции, функции преобразования по умолчанию "CInt".

Для экономии места я поставил ряд условий для каждого отдельного поля, но вы можете использовать тонкий одно условие, отделяя отдельных проверок с оператором "Или".

Теперь давайте посмотрим, практическое использование этой функции проходит испытания

 Dim номер, начало, конец







 количество = 1







 начать = 0







 конец = 10







 Если период (количество, начало, конец) = 1 Тогда



    



 Еще



    



 End If

В частности, число оценить стоимость отправления и назначения переменных с значимое имя, после чего я делаю хорошее состояние с помощью нашего встроенной функции, как условный фильтр.