Vba excel знак не равно

Операторы сравнения чисел и строк, ссылок на объекты (Is) и строк по шаблону (Like), использующиеся в VBA Excel. Их особенности, примеры вычислений.

Операторы сравнения чисел и строк

Операторы сравнения чисел и строк представлены операторами, состоящими из одного или двух математических знаков равенства и неравенства:

  • <   – меньше;
  • <= – меньше или равно;
  • >   – больше;
  • >= – больше или равно;
  • =   – равно;
  • <> – не равно.

Синтаксис:

Результат = Выражение1 Оператор Выражение2

  • Результат – любая числовая переменная;
  • Выражение – выражение, возвращающее число или строку;
  • Оператор – любой оператор сравнения чисел и строк.

Если переменная Результат будет объявлена как Boolean (или Variant), она будет возвращать значения False и True. Числовые переменные других типов будут возвращать значения 0 (False) и -1 (True).

Операторы сравнения чисел и строк работают с двумя числами или двумя строками. При сравнении числа со строкой или строки с числом, VBA Excel сгенерирует ошибку Type Mismatch (несоответствие типов данных):

Sub Primer1()

On Error GoTo Instr

Dim myRes As Boolean

‘Сравниваем строку с числом

  myRes = «пять» > 3

Instr:

If Err.Description <> «» Then

  MsgBox «Произошла ошибка: « & Err.Description

End If

End Sub

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

Значения буквенных символов увеличиваются в алфавитном порядке, причем сначала идут все заглавные (прописные) буквы, затем строчные. Если необходимо сравнить длины строк, используйте функцию Len.

myRes = «семь» > «восемь» ‘myRes = True

myRes = «Семь» > «восемь» ‘myRes = False

myRes = Len(«семь») > Len(«восемь») ‘myRes = False

Оператор Is – сравнение ссылок на объекты

Оператор Is предназначен для сравнения двух переменных со ссылками на объекты.

Синтаксис:

Результат = Объект1 Is Объект2

  • Результат – любая числовая переменная;
  • Объект – переменная со ссылкой на любой объект.

Если обе переменные Объект1 и Объект2 ссылаются на один и тот же объект, Результат примет значение True. В противном случае результатом будет False.

Set myObj1 = ThisWorkbook

Set myObj2 = Sheets(1)

Set myObj3 = myObj1

Set myObj4 = Sheets(1)

myRes = myObj1 Is myObj2 ‘myRes = False

myRes = myObj1 Is myObj3 ‘myRes = True

myRes = myObj2 Is myObj4 ‘myRes = True

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

Set myObj1 = Range(«A1:D4»)

Set myObj2 = Range(«A1:D4»)

Set myObj3 = myObj1

myRes = myObj1 Is myObj2 ‘myRes = False

myRes = myObj1 Is myObj3 ‘myRes = True

Оператор Like – сравнение строк по шаблону

Оператор Like предназначен для сравнения одной строки с другой по шаблону.

Синтаксис:

Результат = Выражение Like Шаблон

  • Результат – любая числовая переменная;
  • Выражение – любое выражение, возвращающее строку;
  • Шаблон – любое строковое выражение, которое может содержать знаки подстановки.

Строка, возвращенная аргументом Выражение, сравнивается со строкой, возвращенной аргументом Шаблон. Если обе строки совпадают, переменной Результат присваивается значение True, иначе – False.

myRes = «восемь» Like «семь»  ‘myRes = False

myRes = «восемь» Like «*семь»  ‘myRes = True

myRes = «Куда идет король» Like «идет»  ‘myRes = False

myRes = «Куда идет король» Like «*идет*»  ‘myRes = True

Со знаками подстановки для оператора Like вы можете ознакомиться в статье Знаки подстановки для шаблонов.

VBA in Excel stands for Visual Basic for Applications which is Microsoft’s programming language. To optimize the performance and reduce the time in Excel we need Macros and VBA is the tool used in the backend.

Some helpful links to get more insights about Macros, VBA in Excel :

1. Record Macros in Excel.

2. How to Create a Macro in Excel?

In this article, we are going to discuss various comparison operators in Excel VBA.

Implementation :

In the Microsoft Excel tabs, select the Developer Tab. Initially, the Developer Tab may not be available. 

The Developer Tab can be enabled easily by a two-step process :

  • Right-click on any of the existing tabs in the top of the Excel window.
  • Now select Customize the Ribbon from the pop-down menu.

  • The Excel Options Box, check the box Developer to enable it and click on OK.

  • Now, the Developer Tab is visible.

  • Now click on the Visual Basic option in the Developer tab and make a new module to write the program.
Developer  -> Visual Basic -> Tools -> Macros

Now create a Macro and give any suitable name.

This will open the Editor window where can write the code.

Comparison Operators in Excel:

S.No. Operators

Definition

1 <>

 Not equal operator is used to compare two operands. If the two operands

are not equal it returns TRUE else it returns FALSE.

For example : A=10, B= 20

The condition will be TRUE for A <> B, since A and B are not equal.

2 =

 Equal operator is used to compare two operands. If the two operands

are equal it returns TRUE else it returns FALSE.

For example : A=20, B= 20

The condition will be TRUE for A = B, since A and B are equal.

3 >

Greater than operator checks whether the operand on the left hand side is strictly 

greater than the operand on RHS. If greater then it returns TRUE else FALSE.

For example : A=10, B= 5

The condition will be TRUE for A > B, since A is greater than B.

4 <

Less than operator checks whether the operand on the left hand side is strictly

less than the operand on RHS. If greater then it returns TRUE else FALSE.

For example : A=10, B= 5

The condition will be FALSE for A < B, since A is greater than B.

5 >=

Greater than equal to operator checks whether the operand on the left hand side is either

greater or equal to the operand on RHS. If greater or equal then it returns TRUE else FALSE.

For example : A=10, B=10

The condition will be TRUE for A >= B, since A is equal to B.

6 <=

Less than equal to operator checks whether the operand on the left hand side is either

lesser or equal to the operand on RHS. If lesser or equal then it returns TRUE else FALSE.

For example : A=5, B=10

The condition will be TRUE for A <= B, since A is less than B.

The comparison operators are mostly used with the If Else Then statement in Excel because comparison operators return TRUE if the condition is met and FALSE if not. 

The syntax of If Else in Excel is :

If condition/expression Then
    Code Block for True
Else
    Code Block for False
End If

Let’s take an example where values of A=-1 and B=-5 and see the code in Excel VBA for all the comparison operators.

1. Equal To and Not Equal To

Sub Comparison_Operator_Demo()
'Entering the numbers
Dim A As Integer: A = -1
Dim B As Integer: B = -5
'Condition for Equal To
If A = B Then
    MsgBox " A and B are equal"
Else
    MsgBox " A and B are not equal"
End If
End Sub

In the above code, If the condition becomes FALSE since A and B values are not the same. So the code block inside Else will be executed.

Sub Comparison_Operator_Demo()
'Entering the numbers
Dim A As Integer: A = -1
Dim B As Integer: B = -5
'Condition for Not Equal To
If A <> B Then
    MsgBox " True since A and B are not same"
Else
    MsgBox " False since A and B are same"
End If
End Sub

In the above code If the condition becomes TRUE since A and B are not same. So the code block inside If will be executed.

2. Greater than or Less than operator :

Sub Comparison_Operator_Demo()
'Entering the numbers
Dim A As Integer: A = -1
Dim B As Integer: B = -5
'Condition for Greater Than
If A > B Then
    MsgBox " A is greater than B"
Else
    MsgBox " A is not greater than B"
End If
End Sub

In the above code If the condition becomes TRUE since A is greater than B. So the code block inside If will be executed.

Sub Comparison_Operator_Demo()
'Entering the numbers
Dim A As Integer: A = -1
Dim B As Integer: B = -5
'Condition for Less Than
If A < B Then
    MsgBox "True because A is less than B"
Else
    MsgBox "False because A is greater than B"
End If
End Sub

In the above code If the condition becomes FALSE since A is greater than B. So the code block inside Else will be executed.

Similarly, you can do for Greater than equal to and Less than equal to operators.

Not Equal is an operator in VBA, also called a negation operator. It is a logical function, so the output returned by this function is either “True” or “False.” We know that the equal operator is “=” this but not equal is “<>” in VBA, so whatever the value we get from the equal operator, we will get the exact opposite value using the Not Equal operator.

“Not Equal” Operator in VBA

Usually, we do a logical test “whether something is equal to other things or not.” Sometimes, we also need to do the “inequality” test. The inequality test is nothing but not an equal test. Generally, we say if something is equal to another thing or not. If it is equal, perform some task if not a different task. Similarly, we can also do some operations using the Inequality test. For example, “NOT EQUAL” in VBA represents the combination of greater than and less than symbols. If both these operators are combined, then it becomes not equal, i.e., “<>.

Table of contents
  • “Not Equal” Operator in VBA
    • How Not Equal to Works in Excel VBA?
    • Examples of Not Equal to in Excel VBA
      • Example #1
      • Example #2
    • Hide and Unhide Sheets with Not Equal Sign
      • #1 – Hide All Sheets except One Sheet
      • #2 – Unhide All Sheets except One Sheet
    • Recommended Articles

How Not Equal Works in Excel VBA?

VBA Not Equal works exactly opposite to the logic of equal to operator. Equal to operator returns TRUE if the supplied test is satisfied is not, it will return FALSE. So, for example, if you say 10 = 10, it will return TRUE or else FALSE.

Conversely, “Not Equal” works in the opposite direction. If the supplied logical test in excelA logical test in Excel results in an analytical output, either true or false. The equals to operator, “=,” is the most commonly used logical test.read more is not equal, then only it will return TRUE or else FALSE.

For example, if you say 10 <> 10, it will return FALSE because 10 equals 10. Therefore, one value should not be equal to the other value to get a TRUE result.

VBA Not Equal

You are free to use this image on your website, templates, etc, Please provide us with an attribution linkArticle Link to be Hyperlinked
For eg:
Source: VBA Not Equal (wallstreetmojo.com)

Examples of Not Equal to in Excel VBA

Below are the examples of not equal to the operator in Excel VBA.

Example #1

Now, we will see how to practically use the VBA Not Equal (<>) sign. Look at the below piece of code.

Code:

Sub NotEqual_Example1()

    Dim k As String

    k = 100 <> 100

    MsgBox k

End Sub

VBA Not Equal Example 1

Here, we are testing whether the number 100 is not equal to the number 100. We know the number 100 equals 100, so the result will be FALSE.

VBA Not Equal Example 1-1

Now, we will change the equation.

Code:

Sub NotEqual_Example1()

    Dim k As String

    k = 100 <> 99

    MsgBox k

End Sub

VBA Not Equal Example 1-2

Now, the test is whether the number 100 is not equal to 99. So the result will be TRUE.

VBA Not Equal Example 1-3

Example #2

Now, we will see how to use this not equal operator in real-time examples. For the demonstration, we have created some data.

VBA Not Equal Example 2

We have “Value 1” and “Value 2.”

Now, our requirement is if Value 1 is not equal to Value 2, then we need the result as “Different,” or else we need the result as “Same.”

Step 1: Define a variable as an Integer.

Code:

Sub NotEqual_Example2()

 Dim k As Integer

End Sub

VBA Not Equal Example 2-1

Step 2: Open FOR NEXT LOOP from 2 to 9.

Code:

Sub NotEqual_Example2()

  Dim k As Integer

  For k = 2 To 9

  Next k

End Sub

Example 2-2

Step 3: Inside the loop, we need to test whether Value 1 is not equal to Value 2. Since we need our results, we need to use IF Condition.

Code:

Sub NotEqual_Example2()

   Dim k As Integer

   For k = 2 To 9

      If Cells(k, 1) <> Cells(k, 2) Then
           Cells(k, 3).Value = "Different"
      Else
           Cells(k, 3).Value = "Same"
      End If

   Next k

End Sub

Example 2-3

Suppose the condition tests whether Value 1 is not equal to Value 2 or not. If not equal, it will return “Different.” If equal, it will return “Same.”

You can copy and paste the below VBA codeVBA code refers to a set of instructions written by the user in the Visual Basic Applications programming language on a Visual Basic Editor (VBE) to perform a specific task.read more.

Copy this code to your module and run using the F5 key or manually. It will return a result like this.

Example 2-4

Hide and Unhide Sheets with Not Equal Sign

The various ways of using not equal sign are enormous. However, we can use this sign to fulfill our needs.

#1 – Hide All Sheets except One Sheet

We have seen this kind of situation many times. We needed to hide all the sheets except the particular sheet.

For example, if you want to hide all sheets except the sheet name “Customer Data,” then you can use this code.

Code:

Sub Hide_All()

    Dim Ws As Worksheet

    For Each Ws In ActiveWorkbook.Worksheets

        If Ws.Name <> "Customer Data" Then
            Ws.Visible = xlSheetVeryHidden
        End If
    Next Ws

End Sub

Example 3

Note: Change the worksheet name to your worksheet name.

#2 – Unhide All Sheets except One Sheet

Similarly, we can also unhide all sheets except one sheet. Use the below code to do this.

Code:

Sub Unhide_All()

    Dim Ws As Worksheet

    For Each Ws In ActiveWorkbook.Worksheets

        If Ws.Name <> "Customer Data" Then
            Ws.Visible = xlSheetVisible
        End If
   Next Ws

End Sub

Example 3-1.

You can download this VBA Not Equal to Excel template here – VBA Not Equal Operator Template.

Recommended Articles

This article has been a guide to VBA, Not Equal. Here, we look at how to use the logical operator “Not Equal to” in VBA, along with practical examples and downloadable Excel sheets. Below are some useful VBA-related articles: –

  • Not Function in Excel VBA
  • VBA StrConv
  • VBA Integer

These are operators that are used to compare values. Comparison operators include equal to, less than, greater than and not equal to

Comparison operators are used to compare values for validation purposes. Let’s say you are developing a simple point of sale application. In this application, you want to validate the values entered before you post. In such cases, you can use comparison operators. This operator will check against the negative numbers or to ensure that the amount paid does not exceed the billed amount. Comparison operators come in handy in such situations.

The following table lists the comparison operators defined in VBA.

Operator Description
= Equal: checks if two values are equal. It is also used as an assignment operator
< Less than: This operator is used to subtract numbers
> Greater than: This operator is used to multiply numbers
<> Not equal to: This operator is used to divide numbers
<= Less than or equal to:
>= Greater than or equal to:

VBA Comparison Operators with Example

The following table shows Excel VBA Comparison Operators with examples and output.

S/N Operator Example Output
1 = If x = z Then Returns true if they are equal, else it returns false
2 < If x < z Then Returns true if x is less than z, else it returns false
3 > If x > z Then Returns true if x is greater than z, else it returns false
4 <> If x <> z Then Returns true if they are not equal, else it returns false
5 <= If x <= z Then Returns true if x is less than or equal to z, else it returns false
6 >= If x >= Then Returns true if x is greater than or equal to z, else it returns false

Example source code

Equal Comparison Operator

    If 2 = 1 Then
            MsgBox "True", vbOKOnly, "Equal Operator"
        Else
            MsgBox "False", vbOKOnly, "Equal Operator"
    End If

HERE,

  • “If 2 = 1 Then… Else… End If” uses the if statement to evaluate the condition “2 = 1”
  • “MsgBox…” Is a built-in function that displays a message box.
    • The first parameter “True” or “False” is what will be displayed in the message box. In our example, 2 is not equal to 1, therefore, it will show “false” in the msg box.
    • The second parameter “vbOKOnly” is the button that is displayed in the message box
    • The third parameter “Equal Operator” is the title of the message box.

Executing the above code gives the following results

VBA Operators

Download the above Excel Code

Содержание

  1. Операторы сравнения
  2. Синтаксис
  3. Замечания
  4. Пример
  5. См. также
  6. Поддержка и обратная связь
  7. Операторы сравнения VBA — не равно и не только
  8. Список основных операторов сравнения в VBA
  9. Больше или равно
  10. Меньше, чем
  11. Comparison Operators in Visual Basic
  12. Сравнение числовых значений
  13. Сравнение строк
  14. Сравнение объектов
  15. Сравнение типа объекта

Операторы сравнения

Используется для сравнения выражений.

Синтаксис

Результат = expression1comparisonoperatorexpression2result = object1Isobject2result = stringLikepattern

Операторы сравнения состоят из следующих частей:

Part Описание
result Обязательный элемент; любая числовая переменная.
выражение Обязательный элемент; любое выражение.
comparisonoperator Обязательный элемент; любой оператор сравнения.
object Обязательный; любое имя объекта.
строка Обязательный элемент; любое строковое выражение.
pattern Обязательный элемент; любое строковое выражение или диапазон символов.

Замечания

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

Оператор True, если False, если Null, если
(Меньше) expression1 = expression2 expression1 или expression2 = NULL
(Меньше или равно) expression1 expression2 expression1 или expression2 = NULL
> (Больше) expression1>expression2 expression1 >= (Больше или равно) expression1> = expression2 expression1 = (Равно) expression1 = expression2 expression1<>expression2 expression1 или expression2 = NULL
<> (Не равно) expression1<>expression2 expression1 = expression2 expression1 или expression2 = NULL

Операторы Is и Like обладают особыми возможностями сравнения, которые отличаются от возможностей операторов, приведенных в таблице.

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

Если Then
Оба выражения представляют собой числовые типы данных (Byte, Boolean, Integer, Long, Single, Double, Date, Currency или Decimal) Выполните числовое сравнение.
Оба выражения имеют тип String Выполняется сравнение строк.
Одно выражение является числовым типом данных, а другое — типом Variant, который равен числу или может им быть Выполните числовое сравнение.
Одно выражение является числовым типом данных, а другое — строкой Variant, которая не может быть преобразована в число Возникает Type Mismatch ошибка.
Одно выражение — String, а другое — любое значение Variant за исключением Null Выполните строковое сравнение.
Одно выражение — Empty, а другое является числовым типом данных Выполните числовое сравнение, используя 0 в качестве выражения Empty.
Одно выражение — Empty, а другое — String Выполните строковое сравнение, используя строку нулевой длины («») в качестве выражения Empty.

Если оба выражения expression1 и expression2 являются выражениями типа Variant, порядок их сравнения определяется их базовым типом. В следующей таблице показано, как сравниваются выражения или результат сравнения в зависимости от базового типа Variant.

Если Then
Оба выражения Variant являются числовыми Выполните числовое сравнение.
Оба выражения Variant являются строками Выполните строковое сравнение.
Одно выражение Variant числовое, а другое строка Числовое выражение меньше, чем строковое выражение.
Одно выражение VariantEmpty, а другое — числовое Выполните числовое сравнение, используя 0 в качестве выражения Empty.
Одно выражение VariantEmpty, а другое — строка Выполните строковое сравнение, используя строку нулевой длины («») в качестве выражения Empty.
Оба выражения VariantEmpty Выражения равны.

Когда переменная Single сравнивается с переменной Double, значение Double округляется до точности типа Single. Если переменная Currency сравнивается с переменной Single или Double, значение Single или Double преобразуется в тип Currency.

Аналогично, когда переменная Decimal сравнивается с переменной Single или Double, значение Single или Double преобразуется в тип Decimal. Для типа Currency любое дробное значение менее чем 0,0001 может быть потеряно; для типа Decimal любое дробное значение менее чем 1E-28 может быть потеряно, или возможно возникновение ошибки переполнения. Потеря такого дробного значения может привести к тому, что два сравниваемых значения будут равны, когда на самом деле они не равны.

Пример

В этом примере показаны различные варианты использования операторов сравнения, которые применяются для сравнения выражений.

См. также

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.

Источник

Операторы сравнения VBA — не равно и не только

VBA позволяет использовать операторы сравнения для сравнения значений. Используя эти операторы, вы можете сравнивать значения и в результате возвращать логическое значение True или False.

Список основных операторов сравнения в VBA

Сначала мы отобразим список операторов сравнения, которые можно использовать в коде VBA:

Оператор сравнения

Больше или равно

intB ТогдаblnResult = TrueЕщеblnResult = ЛожьКонец, если

В этом примере мы хотим проверить, intA больше, чем intB. Если это правда, значение Boolean blnResult будет True, в противном случае — False.

Кроме того, мы используем > в операторе If, чтобы проверить, имеет ли значение intA больше, чем intB:

12345 Если intA> intB ТогдаblnResult = TrueЕщеblnResult = ЛожьКонец, если

В заключение, посколькуintA больше, чем intB, то blnResult возвращает True:

Изображение 3. Использование оператора «Больше, чем»

Больше или равно

В Больше или равно Оператор проверяет, больше ли первое значение второму или равно ему, и возвращает True или False. Вот пример кода:

123456789101112 Dim intA как целое числоDim intB как целое числоDim blnResult As BooleanintA = 5intB = 5Если intA> = intB ТогдаblnResult = TrueЕщеblnResult = ЛожьКонец, если

В этом примере мы хотим проверить, intA Больше или равно intB. Если это правда, значение Boolean blnResult будет True, в противном случае — False.

Мы используем>= в операторе If, чтобы проверить, имеет ли значение intA Больше или равно intB:

12345 Если intA> = intB ТогдаblnResult = TrueЕщеblnResult = ЛожьКонец, если

В заключение, поскольку обе переменные равны 5, blnResult возвращает True:

Изображение 4. Использование оператора «Больше или равно»

Меньше, чем

В Меньше, чем Оператор проверяет, меньше ли первое значение второго и возвращает True или False. Вот пример кода:

Источник

Comparison Operators in Visual Basic

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

Сравнение числовых значений

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

Оператор Условие протестировано Примеры
= (Равенство) Равно ли значение первого выражения значению второго? 23 = 33 ‘ False

23 = 12 ‘ False

<> (Неравенство) Не соответствует ли значение первого выражения значению второго? 23 <> 33 ‘ True

23 <> 12 ‘ True

(Меньше) Значение первого выражения меньше значения второго? 23 33 ‘ True

23 12 ‘ False

> (Больше) Является ли значение первого выражения больше значения второго? 23 > 33 ‘ False

23 > 12 ‘ True

(Меньше или равно) Является ли значение первого выражения меньше или равно значению второго? 23 33 ‘ True

23 12 ‘ False

>= (Больше или равно) Является ли значение первого выражения больше или равно значению второго? 23 >= 33 ‘ False

23 >= 12 ‘ True

Сравнение строк

Visual Basic сравнивает строки с помощью оператора Like , а также числовых операторов сравнения. Оператор Like позволяет указать шаблон. Затем строка сравнивается с шаблоном, и если она совпадает, результатом будет True . В противном случае результат будет False . Числовые операторы позволяют сравнивать String значения на основе порядка сортировки, как показано в следующем примере.

‘ The result of the preceding comparison is True.

Результатом в предыдущем примере является True то, что первый символ в первой строке сортируется перед первым символом во второй строке. Если первые символы равны, сравнение продолжится до следующего символа в обеих строках и т. д. Вы также можете проверить равенство строк с помощью оператора равенства, как показано в следующем примере.

‘ The result of the preceding comparison is True.

Если одна строка является префиксом другой, например «aa» и «aaa», длинная строка считается больше, чем более короткая строка. Это показано в следующем примере.

‘ The result of the preceding comparison is True.

Порядок сортировки основан на двоичном или текстовом сравнении в зависимости от параметра Option Compare . Дополнительные сведения см. в разделе Оператор Сравнения вариантов.

Сравнение объектов

Visual Basic сравнивает две ссылочные переменные объекта с оператором Is и Оператором IsNot. Можно использовать любой из этих операторов, чтобы определить, ссылаются ли две ссылочные переменные на один и тот же экземпляр объекта. Это показано в следующем примере.

В предыдущем примере x Is y принимает значение True , так как обе переменные ссылаются на один и тот же экземпляр . Сравните этот результат с приведенным ниже примером.

В предыдущем примере x Is y вычисляется False как , так как переменные ссылаются на объекты одного типа, они ссылаются на разные экземпляры этого типа.

Если вы хотите проверить наличие двух объектов, не указывающих на один и тот же экземпляр, IsNot оператор позволяет избежать грамматического неуклюжего сочетания Not и Is . Это показано в следующем примере.

В предыдущем примере If a IsNot b эквивалентно If Not a Is b .

Сравнение типа объекта

С помощью выражения . Is можно проверить, имеет ли объект определенный тип TypeOf . Синтаксис выглядит следующим образом:

Если typename указывает тип интерфейса, выражение . Is возвращает значение True , TypeOf если объект реализует тип интерфейса. Если typename является типом класса, выражение возвращает True значение , если объект является экземпляром указанного класса или класса, производного от указанного класса. Это показано в следующем примере.

В предыдущем примере выражение принимает значение , TypeOf x Is Control так как тип x — Button , который наследуется от Control . True

Дополнительные сведения см. в разделе Оператор TypeOf.

Источник

Понравилась статья? Поделить с друзьями:
  • Vba excel защищенную ячейку
  • Vba excel защищенная ячейка
  • Vba excel если строка содержит
  • Vba excel заполнить диапазон значением
  • Vba excel если ошибка то пропустить