小心VB.NET中的除运算符"/"和"\"

前端之家收集整理的这篇文章主要介绍了小心VB.NET中的除运算符"/"和"\"前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。

转载于:http://www.cnblogs.com/freshman0216/archive/2008/08/27/1276991.html

VB.NET中除运算符有两种,普通除"/"和整数除"\",如果我们写程序时不注意两者的区别,很容易造成潜在的错误,这种错误很隐蔽,不容易被发现。而且VB.NET中类型转换和C#差别很大,应该引起我们足够的重视,这些看似微不足道的细节却直接关系都我们代码的健壮性。

1.问题的引出

下面是开发中遇到问题代码的简化部分,输入大部分数据都没问题,但当输入数字为18时会抛出异常“System.ArgumentException: 偏移量和长度超出数组的界限,于从索引到源集合结尾处的元素数量在 System.Collections.ArrayList.GetRange(Int32 index,Int32 count)”。是什么原因使ArrayList集合越界呢?这和VB.NET中的除运算符有什么关系呢?当我们理解了VB.NET中两种除的区别以及类型转换(Double—>Integer)的实质后,问题的答案也就不言自明了。

 Sub Main()
        Console.WriteLine("请输入一个整数:")
        F1(Console.ReadLine())
        Console.ReadLine()
    End Sub

    Public Sub F1(ByVal times As Integer)
        Dim list As ArrayList = New ArrayList()
        '填充数据
        For i As Integer = 0 To 29
            list.Add(i)
        Next
        '把集合list中元素分成times份进行处理
        Dim oneTimeNum As Integer = list.Count / times
        For i As Integer = 0 To times - 1
            Dim length As Integer = oneTimeNum
            If i = times - 1 Then
                '最后一次循环取集合中所有剩余数据
                length = list.Count - oneTimeNum * i
            End If
            '实际中这里是启动线程处理,这里简化只是来说明问题
            F2(list.GetRange(oneTimeNum * i,length))
        Next
    End Sub

    Private Sub F2(ByVal al As ArrayList)
        '对ArrayList集合al进行处理
    End Sub


2.普通除"/"和整数除"\"

1)普通除:expression1 / expression2

结果是 expression1 除以 expression2 的完整的商,包括任何余数。执行除法之前,任何整数数值表达式(除数和被除数)都会被扩展为 Double。如果将结果赋给整数数据类型,Visual Basic 会试图将结果从 Double 转换成这种类型。

举例说明:30 / 18 =1.6666666666666667,执行除法前被除数30和除数18都扩展为Double类型,结果也为Double类型。

2)整数除:expression1\ expression2

结果是 expression1 除以 expression2 的整数商,它丢弃了所有余数,只保留整数部分(称为截断)。结果数据类型是数值类型,对应于 expression1 和 expression2 的数据类型。值得注意的一点,如果除数或被除数为浮点数,在执行除法前,编译器会采用“四舍六入五成双”的规则将其转换成Long类型,再执行除法。

举例说明:30 / 18 =1,只保留结果的整数部分。

3.VB.NET中的类型转换(Double—>Integer)

根据第二部分对普通除的解释,当CLR执行Dim oneTimeNum As Integer =30 / 18时,首先将被除数30和除数18都扩展为Double类型,进行除运算得到Double类型的结果1.6666666666666667,因为要将Double类型数据赋值给Integer类型变量,此时要执行强制类型转换,得到最终结果oneTimeNum = 2(可能很多人和我一样会奇怪结果为什么不是1)。我们从IL代码中查看VB.NET中从Double—>Integer类型转换的实质。

.method public static void  F1(int32 times) cil managed
{
  // 代码大小       123 (0x7b)
  .maxstack  3
  .locals init ([0] class [mscorlib]System.Collections.ArrayList list,[1] int32 oneTimeNum,[2] int32 i,[3] int32 V_3,[4] int32 length,[5] int32 VB$t_i4$L0,[6] int32 VB$CG$t_i4$S0,[7] bool VB$CG$t_bool$S0)
  IL_0000:  nop
  IL_0001:  newobj     instance void [mscorlib]System.Collections.ArrayList::.ctor()
  IL_0006:  stloc.0
  IL_0007:  ldc.i4.0
  IL_0008:  stloc.2
  IL_0009:  ldloc.0
  IL_000a:  ldloc.2
  IL_000b:  Box        [mscorlib]System.Int32
  IL_0010:  callvirt   instance int32 [mscorlib]System.Collections.ArrayList::Add(object)
  IL_0015:  pop
  IL_0016:  nop
  IL_0017:  ldloc.2
  IL_0018:  ldc.i4.1
  IL_0019:  add.ovf
  IL_001a:  stloc.2
  IL_001b:  ldloc.2
  IL_001c:  ldc.i4.s   29
  IL_001e:  stloc.s    VB$CG$t_i4$S0
  IL_0020:  ldloc.s    VB$CG$t_i4$S0
  IL_0022:  ble.s      IL_0009
  IL_0024:  ldloc.0
  IL_0025:  callvirt   instance int32 [mscorlib]System.Collections.ArrayList::get_Count()
  IL_002a:  conv.r8
  IL_002b:  ldarg.0
  IL_002c:  conv.r8
  IL_002d:  div
  IL_002e:  call       float64 [mscorlib]System.Math::Round(float64) //重点看这句
  IL_0033:  conv.ovf.i4
  IL_0034:  stloc.1
  IL_0035:  ldc.i4.0
  IL_0036:  ldarg.0
  IL_0037:  ldc.i4.1
  IL_0038:  sub.ovf
  IL_0039:  stloc.s    VB$t_i4$L0
  IL_003b:  stloc.3
  IL_003c:  br.s       IL_0070
  IL_003e:  ldloc.1
  IL_003f:  stloc.s    length
  IL_0041:  ldloc.3
  IL_0042:  ldarg.0
  IL_0043:  ldc.i4.1
  IL_0044:  sub.ovf
  IL_0045:  ceq
  IL_0047:  stloc.s    VB$CG$t_bool$S0
  IL_0049:  ldloc.s    VB$CG$t_bool$S0
  IL_004b:  brfalse.s  IL_0059
  IL_004d:  ldloc.0
  IL_004e:  callvirt   instance int32 [mscorlib]System.Collections.ArrayList::get_Count()
  IL_0053:  ldloc.1
  IL_0054:  ldloc.3
  IL_0055:  mul.ovf
  IL_0056:  sub.ovf
  IL_0057:  stloc.s    length
  IL_0059:  nop
  IL_005a:  ldloc.0
  IL_005b:  ldloc.1
  IL_005c:  ldloc.3
  IL_005d:  mul.ovf
  IL_005e:  ldloc.s    length
  IL_0060:  callvirt   instance class [mscorlib]System.Collections.ArrayList [mscorlib]System.Collections.ArrayList::GetRange(int32,int32)
  IL_0065:  call       void VBTest.Module1::F2(class [mscorlib]System.Collections.ArrayList)
  IL_006a:  nop
  IL_006b:  nop
  IL_006c:  ldloc.3
  IL_006d:  ldc.i4.1
  IL_006e:  add.ovf
  IL_006f:  stloc.3
  IL_0070:  ldloc.3
  IL_0071:  ldloc.s    VB$t_i4$L0
  IL_0073:  stloc.s    VB$CG$t_i4$S0
  IL_0075:  ldloc.s    VB$CG$t_i4$S0
  IL_0077:  ble.s      IL_003e
  IL_0079:  nop
  IL_007a:  ret
} // end of method Module1::F1


从IL代码可以看出,VB.NET中执行类型转换实际上是调用函数[mscorlib]System.Math::Round(float64),MSDN中对这个函数的解释:将双精度浮点值舍入为最接近的整数,如果参数为两个整数的中值,这两个整数一个为偶数,另一个为奇数,则返回偶数(也就是我们常说的“四舍六入五成双”)。
现在,可以很好的解释文章开始提出的问题了:由于输入18时,oneTimeNum的值为2,当循环到第16次时i = 15,此时执行list.GetRange(oneTimeNum * i,length)list.GetRange(30,2),已经超出了list的长度范围,所以会抛出异常。

4.C#和VB.NET的区别

1)C#中的除运算"/"符相当于VB.NET的整数除"\"运算符;
2)C#中从Double—>Integer类型转换必须要采用显示方式,且转换规则为直接舍弃小数位。

总结这次出现问题的根源是用C#语法去推断VB.NET语法,因为接触C#较早,而C#和VB.NET语法又大同小异,忽略了对VB.NET基本语法的学习,以后应多注意两种语言的差别,尽量减少类似的错误。还有一点需要注意,遇到问题的时候多查MSDN,似乎现在都习惯从网上寻求答案,但网上关于VB.NET除运算符的内容并不多,找了半天,才发现MSDN上写的很详细,我想查找资料的顺序应该是:MSDN—>CNBlogs找找看—>Google/Baidu。

原文链接:https://www.f2er.com/vb/257429.html

猜你在找的VB相关文章