标签：多重 False 结果 整数 用法 VB6.0 Print Integer True

      VB6.0中“=”运算符参与多种运算： 赋值运算和比较运算。在实际应用中，怎么正确选择它们的用法呢？以下讨论这个问题。

      “=”运算符在独立表达式中为赋值符号，而在嵌套使用的非独立表达式中为比较符号。

 

      本例的关键代码如下：

'=在独立表达式中为赋值符号

Private Sub Command1_Click()

   Dim a As Integer, b As Integer, c As Integer

   a = 3

   b = 2

   c = a > b

   Print c

   '结果为：-1  因a > b为True，自动转换为整数为-1

   '结论：通过比较，这里的=运算符，为赋值符号。

  

   a = 3

   b = 5

   c = a > b

   Print c

   '结果为：0

  

   Dim d As Variant

   a = 3

   b = 2

   d = a > b

   Print d

   '结果为：True

  

   a = 3

   b = 5

   d = a > b

   Print d

   '结果为：False

End Sub

 

'=在非独立表达式中为比较符号

Private Sub Command4_Click()

   Dim a As Integer, b As Integer, c As Integer

   a = 3

   b = 2

  

   '1模块

   b = -1

   c = 3

   Print c = a = b

   '结果为：True

   'c = a为True，自动转换为整数为-1，-1 = b为True，故第3部分的结果为True

  

   '2模块

   b = 0

   c = 3

   Print c = a = b

   '结果为：False

   'c = a为True，自动转换为整数为-1，-1 = b为False，故第3部分的结果为False

  

   '1、2模块说明：True自动转换为整数为-1，而不是0

   

   

   '3模块

   b = 0

   c = 2

   Print c = a = b

   '结果为：True

   'c = a为False，自动转换为整数为0，0 = b为True，故第3部分的结果为True

  

   '4模块

   b = -1

   c = 2

   Print c = a = b

   '结果为：False

   'c = a为False，自动转换为整数为0，0=b为False，故第3部分的结果为False

  

   '3、4模块说明：False自动转换为整数为0，而不是-1

End Sub

标签：多重,False,结果,整数,用法,VB6.0,Print,Integer,True
来源： https://www.cnblogs.com/it001xyz/p/15009343.html

本站声明： 1. iCode9 技术分享网（下文简称本站）提供的所有内容，仅供技术学习、探讨和分享；
2. 关于本站的所有留言、评论、转载及引用，纯属内容发起人的个人观点，与本站观点和立场无关；
3. 关于本站的所有言论和文字，纯属内容发起人的个人观点，与本站观点和立场无关；
4. 本站文章均是网友提供，不完全保证技术分享内容的完整性、准确性、时效性、风险性和版权归属；如您发现该文章侵犯了您的权益，可联系我们第一时间进行删除；
5. 本站为非盈利性的个人网站，所有内容不会用来进行牟利，也不会利用任何形式的广告来间接获益，纯粹是为了广大技术爱好者提供技术内容和技术思想的分享性交流网站。