Sideway
output.to from Sideway
Draft for Information Only

Content

VBScript Comparison Operators
 < Operator
  Syntax
  Argument
  Remark
  Version
 <= Operator
  Syntax
  Argument
  Remark
  Version
 > Operator
  Syntax
  Argument
  Remark
  Version
 >= Operator
  Syntax
  Argument
  Remark
  Version
 = Operator
  Syntax
  Argument
  Remark
  Version
 <> Operator
  Syntax
  Argument
  Remark
  Version
 Examples
 Is Operator
  Syntax
  Argument
  Remark
  Version
 Examples

VBScript Comparison Operators

The comparison operators are < Operator, <= Operator, > Operator, >= Operator, = Operator, <> Operator, and Is Operator.

< Operator

last updated 17 Nov 2017

Less than operator is used to create a value by comparing that the first expression is less than the second expression.

Syntax

expression1<‍expression2

Argument

expression1Any expression.expression2Any expression.

Remark

  • The expression returns True if expression1 is less than expression2.
  • The expression returns False if expression1 is greater than or equal to expression2.
  • The expression returns Null if either expression1 or expression2 is Null.
  • If both expressions are numeric then perform a numeric comparison.
  • If both expressions are strings then perform a string comparison.
  • If one expression is numeric and the other is a string then the numeric expression is less than the string expression.
  • If one expression is Empty and the other is numeric then the Empty expression is evaluated as 0 to perform a numeric comparison.
  • If one expression is Empty and the other is a string then the Empty expression is evaluated as zero-length string, "" to perform a string comparison.
  • If both expressions are Empty, then two expressions are equal.

Version

1

<= Operator

last updated 17 Nov 2017

Less than or equal to operator is used to create a value by comparing that the first expression is less than or equal to the second expression.

Syntax

expression1<=expression2

Argument

expression1Any expression.expression2Any expression.

Remark

  • The expression returns True if expression1 is less than or equal to expression2.
  • The expression returns False if expression1 is greater than expression2.
  • The expression returns Null if either expression1 or expression2 is Null.
  • If both expressions are numeric then perform a numeric comparison.
  • If both expressions are strings then perform a string comparison.
  • If one expression is numeric and the other is a string then the numeric expression is less than the string expression.
  • If one expression is Empty and the other is numeric then the Empty expression is evaluated as 0 to perform a numeric comparison.
  • If one expression is Empty and the other is a string then the Empty expression is evaluated as zero-length string, "" to perform a string comparison.
  • If both expressions are Empty, then two expressions are equal.

Version

1

> Operator

last updated 17 Nov 2017

Greater than operator is used to create a value by comparing that the first expression is greater than the second expression.

Syntax

expression1>expression2

Argument

expression1Any expression.expression2Any expression.

Remark

  • The expression returns True if expression1 is greater than expression2.
  • The expression returns False if expression1 is less than or equal to expression2.
  • The expression returns Null if either expression1 or expression2 is Null.
  • If both expressions are numeric then perform a numeric comparison.
  • If both expressions are strings then perform a string comparison.
  • If one expression is numeric and the other is a string then the numeric expression is less than the string expression.
  • If one expression is Empty and the other is numeric then the Empty expression is evaluated as 0 to perform a numeric comparison.
  • If one expression is Empty and the other is a string then the Empty expression is evaluated as zero-length string, "" to perform a string comparison.
  • If both expressions are Empty, then two expressions are equal.

Version

1

>= Operator

last updated 17 Nov 2017

Greater than or equal to operator is used to create a value by comparing that the first expression is greater than or equal to the second expression.

Syntax

expression1>=expression2

Argument

expression1Any expression.expression2Any expression.

Remark

  • The expression returns True if expression1 is greater than or equal to expression2.
  • The expression returns False if expression1 is less than expression2.
  • The expression returns Null if either expression1 or expression2 is Null.
  • If both expressions are numeric then perform a numeric comparison.
  • If both expressions are strings then perform a string comparison.
  • If one expression is numeric and the other is a string then the numeric expression is less than the string expression.
  • If one expression is Empty and the other is numeric then the Empty expression is evaluated as 0 to perform a numeric comparison.
  • If one expression is Empty and the other is a string then the Empty expression is evaluated as zero-length string, "" to perform a string comparison.
  • If both expressions are Empty, then two expressions are equal.

Version

1

= Operator

last updated 17 Nov 2017

Comparing equal to operator is used to create a value by comparing that the first and second expressions are equal to each other. While assigning equal to operation is used to assign a value to variable1 copied the second expressions.

Syntax

expression1=expression2
variable1=expression2

Argument

expression1Any expression.expression2Any expression.variable1 Any variable or any writable property.

Remark

  • The expression returns True if both expression1 and expression2 are equal to each other.
  • The expression returns False if both expression1 and expression2 are not equal to each other.
  • The expression returns Null if either expression1 or expression2 is Null.
  • If both expressions are numeric then perform a numeric comparison.
  • If both expressions are strings then perform a string comparison.
  • If one expression is numeric and the other is a string then the numeric expression is less than the string expression.
  • If one expression is Empty and the other is numeric then the Empty expression is evaluated as 0 to perform a numeric comparison.
  • If one expression is Empty and the other is a string then the Empty expression is evaluated as zero-length string, "" to perform a string comparison.
  • If both expressions are Empty, then two expressions are equal.
  • The name on the left side of the equal sign can be a simple scalar variable or an element of an array. Properties on the left side of the equal sign can only be those properties that are writable at run time.

Version

1

<> Operator

last updated 17 Nov 2017

Not equal to operator is used to create a value by comparing that the first and second expressions are not equal to each other.

Syntax

expression1 <> expression2

Argument

expression1Any expression.expression2Any expression.

Remark

  • The expression returns True if both expression1 and expression2 are not equal to each other.
  • The expression returns False if both expression1 and expression2 are equal to each other.
  • The expression returns Null if either expression1 or expression2 is Null.
  • If both expressions are numeric then perform a numeric comparison.
  • If both expressions are strings then perform a string comparison.
  • If one expression is numeric and the other is a string then the numeric expression is less than the string expression.
  • If one expression is Empty and the other is numeric then the Empty expression is evaluated as 0 to perform a numeric comparison.
  • If one expression is Empty and the other is a string then the Empty expression is evaluated as zero-length string, "" to perform a string comparison.
  • If both expressions are Empty, then two expressions are equal.

Version

1

Examples

Examples of comparison operators

ASP VbScript Command:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
    <head>
<script runat="server" language="VBScript">
Function printdata
cmda=array("a","b","a<b","a<=b","a>b","a>=b","a=b","a<>b"):ucnt=UBound(cmda):call heading
vars="a=Null:b=3":dsp_x
vars="a=Empty:b=3":dsp_x
vars="a="""":b=3":dsp_x
vars="a=2:b=Null":dsp_x
vars="a=2:b=Empty":dsp_x
vars="a=2:b=""""":dsp_x
vars="a=Null:b=""b""":dsp_x
vars="a=Empty:b=""b""":dsp_x
vars="a="""":b=""b""":dsp_x
vars="a=""a"":b=Null":dsp_x
vars="a=""a"":b=Empty":dsp_x
vars="a=""a"":b=""""":dsp_x
vars="a=Null:b=Null":dsp_x
vars="a=Empty:b=Empty":dsp_x
vars="a="""":b=""""":dsp_x
vars="a=2:b=3":dsp_x
vars="a=2.2:b=3.3":dsp_x
vars="a=4:b=0.5":dsp_x
vars="a=4:b=-0.5":dsp_x
vars="a=4:b=-5":dsp_x
vars="a=-4:b=2":dsp_x
vars="a=-4:b=0.5":dsp_x
vars="a=-4:b=2.5":dsp_x
vars="a=-4:b=-2.5":dsp_x
vars="a=-4:b=-0.5":dsp_x
vars="a=-4:b=-2":dsp_x
vars="a=""-4"":b=""2""":dsp_x
vars="a=""a"":b=""b""":dsp_x
vars="a=""-4"":b=-2":dsp_x
vars="a=""a"":b=-2":dsp_x
vars="a=-4:b=""-2""":dsp_x
vars="a=-4:b=""b""":dsp_x
End Function
Dim abb,cnt,cmda,cmp,dai,dlt,dte,dad,e,fnd,flg,fir,f_dw,gbd,hor,i,ild,k,mth,min,num,pnn,pi,sec,str1,str2,str,strs,tme,tmp,ucnt,var,vars,varx,wkd,x,z:varx=0
Function heading:If var=1 Then:tmp="":Else:tmp="<b>vars</b>":End If:For i=0 to ucnt:tmp=tmp&"<b>"&rmv_ctrl(cmda(i))&", TypeName</b>":Next:Response.Write "Results on Microsoft Windows Server 2008 R2 Standard  x64, Microsoft-IIS/7.5, VB Version 14.0<br />"&"<i>"&tmp&"</i>":End Function
Function dsp_x:Dim tmp_a,tmp_b,i:If varx=0  Then:Execute vars:End If:If var=1 Then:tmp_a="":Else:tmp_a=rmv_ctrl(vars):End If:For i=0 to ucnt:tmp_b=cmd_b(cmda(i)):if i/2=fix(i/2) Then:tmp_b="<b>"&tmp_b&"</b>":End If:tmp_a=tmp_a&tmp_b:Next:Response.Write "<i>"&tmp_a&"</i>":End Function
Function rmv_ctrl(blk_str):Select Case blk_str:Case chr(0):blk_str="NUL":Case chr(1):blk_str="SOH":Case chr(2):blk_str="STX":Case chr(3):blk_str="ETX":Case chr(4):blk_str="EOT":Case chr(5):blk_str="ENQ":Case chr(6):blk_str="ACK":Case chr(7):blk_str="BEL":Case chr(8):blk_str="BS":Case chr(9):blk_str="HT":Case chr(10):blk_str="LF":Case chr(11):blk_str="VT":Case chr(12):blk_str="FF":Case chr(13):blk_str="CR":Case chr(14):blk_str="SO":Case chr(15):blk_str="SI":Case chr(16):blk_str="DLE":Case chr(17):blk_str="DC1":Case chr(18):blk_str="DC2":Case chr(19):blk_str="DC3":Case chr(20):blk_str="DC4":Case chr(21):blk_str="NAK":Case chr(22):blk_str="SYN":Case chr(23):blk_str="ETB":Case chr(24):blk_str="CAN":Case chr(25):blk_str="EM":Case chr(26):blk_str="SUB":Case chr(27):blk_str="ESC":Case chr(28):blk_str="FS":Case chr(29):blk_str="GS":Case chr(30):blk_str="RS":Case chr(31):blk_str="US":Case chr(127):blk_str="DEL":End Select:rmv_ctrl=blk_str:If IsNull(blk_str) OR IsEmpty(Blk_str) OR blk_str="" OR IsNumeric(Blk_str) Then:Else:rmv_ctrl=Replace(Replace(Replace(Replace(Replace(blk_str,"&","&amp;"),"  "," &nbsp;"),"""","&quot;"),"<","&lt;"),">","&gt;"): End If :End Function
Function cmd_b(blk_str):cmd_b="["&cmd_x(blk_str)&"], "&cmd_x("TypeName("&blk_str&")"):End Function
Function cmd_x(blk_str):On Error Resume Next:Dim xans, tmp:xans="":tmp="":execute "xans="&blk_str:If Err.Number <> 0  Then:xans=cmd_x("TypeName("&blk_str&")"):Select Case xans:Case 9::Case Else:xans="error":End Select:End If:If IsArray(xans)=False Then:cmd_x=rmv_ctrl(xans): Else:tmp=lst_arry(xans):cmd_x=trim(tmp):End If:End Function
Function lst_arry(blk_str):Dim tmp,i,q:q="""":tmp="":For i=0 to UBound(blk_str):if VarType(blk_str(i))>1 And VarType(blk_str(i))<6 Then:q="'":End If:tmp=tmp&" "&q&rmv_ctrl(blk_str(i))&q:Next:lst_arry=trim(tmp):End Function
</script>
        <title>Sample Page</title>
        <meta http-equiv="Content-Type" content="text/html;charset=utf-8"> 
        <style type="text/css">
           i {display:table-row}
           u,b {display:table-cell}
        </style>
    </head>
    <body>
<%call printdata %>
    </body>
</html>
HTML Web Page Embedded Output:

Is Operator

last updated 17 Nov 2017

Is same Object referenc operator is used to create a value by comparing that the first and second Object references are equal to each other.

Syntax

object1 Is object2

Argument

object1Any object name.object2Any object name.

Remark

  • The expression returns True if both object1 and object2 refer to the same Object.
  • The expression returns False if both object1 and object2 refer to two different Object.
  • Both objects can be Set to Nothing, but not Null or Empty.

Version

1

Examples

Examples of Is Operator

ASP VbScript Command:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
    <head>
<script runat="server" language="VBScript">
Function printdata
cmda=array("c","d","c Is d"):ucnt=UBound(cmda):call heading
vars="strs=""htmlfile"":strs1=""\"":Set obj1=GetObject(strs1,strs): strs=""VBScript.RegExp"": Set obj2= CreateObject(strs): Set c=obj1: Set d=obj1":dsp_x
vars="Set c=obj1:Set d=obj2":dsp_x
vars="Set c=obj1:Set d=Nothing":dsp_x
vars="Set c=Nothing:Set d=Nothing":dsp_x
vars="c=Null:Set d=Nothing":dsp_x
vars="c=Empty:Set d=Nothing":dsp_x
vars="c="""":Set d=Nothing":dsp_x
vars="c=Null:d=Null":dsp_x
vars="c=Empty:d=Empty":dsp_x
End Function
Dim abb,cnt,cmda,cmp,dai,dlt,dte,dad,e,fnd,flg,fir,f_dw,gbd,hor,i,ild,k,mth,min,num,pnn,pi,sec,str1,str2,str,strs,tme,tmp,ucnt,var,vars,varx,wkd,x,z:varx=0
Function heading:If var=1 Then:tmp="":Else:tmp="<b>vars</b>":End If:For i=0 to ucnt:tmp=tmp&"<b>"&rmv_ctrl(cmda(i))&", TypeName</b>":Next:Response.Write "Results on Microsoft Windows Server 2008 R2 Standard  x64, Microsoft-IIS/7.5, VB Version 14.0<br />"&"<i>"&tmp&"</i>":End Function
Function dsp_x:Dim tmp_a,tmp_b,i:If varx=0  Then:Execute vars:End If:If var=1 Then:tmp_a="":Else:tmp_a=rmv_ctrl(vars):End If:For i=0 to ucnt:tmp_b=cmd_b(cmda(i)):if i/2=fix(i/2) Then:tmp_b="<b>"&tmp_b&"</b>":End If:tmp_a=tmp_a&tmp_b:Next:Response.Write "<i>"&tmp_a&"</i>":End Function
Function rmv_ctrl(blk_str):Select Case blk_str:Case chr(0):blk_str="NUL":Case chr(1):blk_str="SOH":Case chr(2):blk_str="STX":Case chr(3):blk_str="ETX":Case chr(4):blk_str="EOT":Case chr(5):blk_str="ENQ":Case chr(6):blk_str="ACK":Case chr(7):blk_str="BEL":Case chr(8):blk_str="BS":Case chr(9):blk_str="HT":Case chr(10):blk_str="LF":Case chr(11):blk_str="VT":Case chr(12):blk_str="FF":Case chr(13):blk_str="CR":Case chr(14):blk_str="SO":Case chr(15):blk_str="SI":Case chr(16):blk_str="DLE":Case chr(17):blk_str="DC1":Case chr(18):blk_str="DC2":Case chr(19):blk_str="DC3":Case chr(20):blk_str="DC4":Case chr(21):blk_str="NAK":Case chr(22):blk_str="SYN":Case chr(23):blk_str="ETB":Case chr(24):blk_str="CAN":Case chr(25):blk_str="EM":Case chr(26):blk_str="SUB":Case chr(27):blk_str="ESC":Case chr(28):blk_str="FS":Case chr(29):blk_str="GS":Case chr(30):blk_str="RS":Case chr(31):blk_str="US":Case chr(127):blk_str="DEL":End Select:rmv_ctrl=blk_str:If IsNull(blk_str) OR IsEmpty(Blk_str) OR blk_str="" OR IsNumeric(Blk_str) Then:Else:rmv_ctrl=Replace(Replace(Replace(Replace(Replace(blk_str,"&","&amp;"),"  "," &nbsp;"),"""","&quot;"),"<","&lt;"),">","&gt;"): End If :End Function
Function cmd_b(blk_str):cmd_b="["&cmd_x(blk_str)&"], "&cmd_x("TypeName("&blk_str&")"):End Function
Function cmd_x(blk_str):On Error Resume Next:Dim xans, tmp:xans="":tmp="":execute "xans="&blk_str:If Err.Number <> 0  Then:xans=cmd_x("TypeName("&blk_str&")"):Select Case xans:Case 9::Case Else:xans="error":End Select:End If:If IsArray(xans)=False Then:cmd_x=rmv_ctrl(xans): Else:tmp=lst_arry(xans):cmd_x=trim(tmp):End If:End Function
Function lst_arry(blk_str):Dim tmp,i,q:q="""":tmp="":For i=0 to UBound(blk_str):if VarType(blk_str(i))>1 And VarType(blk_str(i))<6 Then:q="'":End If:tmp=tmp&" "&q&rmv_ctrl(blk_str(i))&q:Next:lst_arry=trim(tmp):End Function
</script>
        <title>Sample Page</title>
        <meta http-equiv="Content-Type" content="text/html;charset=utf-8"> 
        <style type="text/css">
           i {display:table-row}
           u,b {display:table-cell}
        </style>
    </head>
    <body>
<%call printdata %>
    </body>
</html>
HTML Web Page Embedded Output:

©sideway

ID: 180400021 Last Updated: 4/21/2018 Revision: 0


Latest Updated LinksValid XHTML 1.0 Transitional Valid CSS!Nu Html Checker Firefox53 Chromena IExplorerna
IMAGE

Home 5

Business

Management

HBR 3

Information

Recreation

Hobbies 8

Culture

Chinese 1097

English 339

Reference 79

Computer

Hardware 249

Software

Application 213

Digitization 32

Latex 52

Manim 205

KB 1

Numeric 19

Programming

Web 289

Unicode 504

HTML 66

CSS 65

SVG 46

ASP.NET 270

OS 429

DeskTop 7

Python 72

Knowledge

Mathematics

Formulas 8

Algebra 84

Number Theory 206

Trigonometry 31

Geometry 34

Coordinate Geometry 2

Calculus 67

Complex Analysis 21

Engineering

Tables 8

Mechanical

Mechanics 1

Rigid Bodies

Statics 92

Dynamics 37

Fluid 5

Fluid Kinematics 5

Control

Process Control 1

Acoustics 19

FiniteElement 2

Natural Sciences

Matter 1

Electric 27

Biology 1

Geography 1


Copyright © 2000-2024 Sideway . All rights reserved Disclaimers last modified on 06 September 2019