如何从数组中保存的单个数字“制作”一个多位整数值（VB.NET）

Question

我有一大堆单个数字整数（0 - 9），我想将这些值的子集转换为单个整数值。例如：

Array(0) = 4
Array(1) = 2
Array(2) = 1
Array(3) = 6
Array(4) = 7
Array(5) = 4
Array(6) = 8
Array(7) = 2
Array(8) = 9
Array(9) = 0

我希望然后使用（例如）数组索引4,5和6创建一个数字;

NewInt = 748

我能看到这样做的唯一方法是制作一个字符串，然后是一个整数（如在CInt中（Cstr（Array（5）＆amp; Array（6）...））但这似乎是不必要的慢。整个我正在做的事情就是加快速度。

有什么建议吗？

Answer 1

看看这个。

    Dim nums() As Integer = {4, 2, 1, 6, 7, 4, 8, 2, 9, 0}

    Dim ans As Long = 0L
    Dim useNums() As Integer = {4, 5, 6}

    For Each idx As Integer In useNums
        ans = (ans * 10L) + nums(idx)
    Next