VB.net在整数中间加0

Question

我有这个整数。 A = 100002的6位数，我想在中间添加2个额外的0，所以它可以是8位数的整数。

结果= 10000002

我该怎么做？

Answer 1

您可以将数字分成两部分，左侧和右侧。然后将零添加到左侧并放回右侧。

100002 - > 100 [左侧] 002 [右侧]

    Dim number As Integer = 100002
    Dim rightSide As Integer = number Mod 1000
    Dim leftSide As Integer = number - rightSide

    leftSide *= 100 ' Add zeros

    Dim newNumber As Integer = leftSide + rightSide

有了这个，123456将成为12300456。

Answer 2

有很多不同的方法来回答这个问题，这意味着你的问题可能不够具体，无法得到你想要的答案。例如，the_lotus的答案当然是正确的（也是一个更实用的解决方案）。但是，此解决方案还将以最简单的方式生成您指定的结果，通过减去2，乘以100，再次添加2：

Result = (A - 2) * 100 + 2

由于这两种非常不同的方法都解决了您提出的问题，因此您可能需要更仔细地解决问题。例如，如果你想使用100002以外的数字（你没有说过你这样做），那么这个解决方案当然不允许这样做。如果您想要一个适用于六位数以外的数字的解决方案，则the_lotus的解决方案也不允许在所有情况下使用。