Vb.net 如何将(3位)十进制从textbox.text转换为Ascii?

Vb.net 如何将(3位)十进制从textbox.text转换为Ascii?,vb.net,visual-studio-2015,Vb.net,Visual Studio 2015,当我将十进制数字输入到文本框时,输出将是一个字 例: 输入: textbox.text=113117111597105 输出: textbox.text=qussai您应该向我们展示您的尝试 完整代码应如下所示: Module VBModule Sub Main() Dim output As String = DecimalToASCII("113117115115097105") Console.WriteLine(output) End Su

当我将十进制数字输入到文本框时,输出将是一个字

例:

输入:

textbox.text=113117111597105

输出:


textbox.text=qussai

您应该向我们展示您的尝试

完整代码应如下所示:

Module VBModule
    Sub Main()
        Dim output As String = DecimalToASCII("113117115115097105")
        Console.WriteLine(output)
    End Sub

    Function DecimalToASCII(ByVal input As String) As String
        Dim current As String = ""
        Dim temp As Integer = 0
        If input.Length Mod 3 <> 0 Then
            Return "Wrong Input"
        End If
        For i As Integer = 0 To input.Length - 1 Step 3
            temp = 0
            For j As Integer = i To i + 2
                temp *= 10
                temp += CType(input(j).ToString(), Integer)
            Next
            current &= Chr(temp).ToString()
        Next
        Return current
    End Function
End Module

97是2位数字。假设可能是这样的十进制数:1131171115097105我需要vb中的代码,plz。好的,谢谢。您能告诉我如何将字符串转换为十进制吗?如果字符的十进制数小于三位数,请在左侧添加0零,然后执行一些操作并在textbox.text中收集它们?例如:a在Ascii equal 97中,我希望它是这样的097,然后097^5 mod 5最终结果将是这样的:2.这是从Ascii转换为十进制的代码,但我无法将2位代码Dim sText左侧的零作为字符串Dim i作为整数Dim lenText作为整数sText=TextBox6添加到lenText sASC=sASC&CStrAscMid$sText,i,1下一个i m=sASCcode@qussai我不是不可能只解析两位数,因为会有冲突的角色。@qussai所以你想在这里做什么?您能告诉我为什么要用ASCII码部分解析字符串吗?