Vb.net 如何将(3位)十进制从textbox.text转换为Ascii?
当我将十进制数字输入到文本框时,输出将是一个字 例: 输入: textbox.text=113117111597105 输出: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=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码部分解析字符串吗?