Question

我被赋予了一项任务，我被困在一个部分。我必须将只有0＆1和＃1的字符串转换为数字，然后使用该二进制数并将其转换为十进制数。将二进制转换为十进制，我能做到。但是获取一个字符串并转换为数字而不使用任何函数，如convert或tryParse等。任何帮助，将不胜感激。在VB中。

Private Function convertToNumeric(inputText As String)
    Dim str() As String = inputText.Split(",")
    Dim result(str.Length - 1) As Integer
    For i = 0 To str.Length - 1
        result(i) = str(i)
    Next
    Return result
End Function

Answer 1

Private Function ConvertStringToNumber(ByVal inputString as String) As Integer
    Dim numb as Integer = 0
    dim powr as Integer = 0
    for i as Integer = inputString.Length -1 to 0 step -1
        if inputString(i).Equals("1") Then
            numb += Math.Pow(2,powr)
        End If
        powr += 1
    next
    return numb
End Function

我认为这更像是你想要的

在VB中没有预定义函数的情况下将一串数字转换为数字

1 个答案: