如何將字符串

我想WText轉換成其ASCII碼，並把它變成一個TextBox內替換字符; Numencrypt。但我不想將空格轉換爲ASCII碼。如何將字符串

如何更換空的空間？

當前代碼：

Dim withSpace As String = Numencrypt.Text 
For h = 1 To lenText 
    wASC = wASC & CStr(Asc(Mid$(WText, h, 1))) 
Next h 
Numencrypt.Text = wASC 
Numencrypt2.Text = Numencrypt2.Replace(Numencrypt.Text, " ", "")

順便說一句，在TextBoxNumencrypt2是WText沒有裏面的空間。

來源

2017-07-31 Reed Hailston

這一立場是完全忽略了我不知道，瞭解你的問題but..what輸入字符串關於第一個替換的空間，然後_convert字符串的ASCII code_？ – Pikoh

你能提供一些樣本和預期的輸出？ – Prisoner

看來你會替換太晚的空間。如果您不想將tye空格轉換爲ASCII碼，則必須在循環之前將其刪除。嘗試：'Dim withSpace As String = Numencrypt.Text.Replace（「」，「」）''而不是。 –

不知道你是否希望我做在一個控制檯應用程序下面的空字符或空字符串，所以我沒有你的變量。我還使用了一個字符串生成器來提高字符串連接的性能。

Dim withSpaces = "This has some spaces in it!" 
withSpaces = withSpaces.Replace(" "c, ControlChars.NullChar) 
Dim wASC As New StringBuilder 
For h = 1 To withSpaces.Length 
    wASC.Append($"{AscW(Mid(withSpaces, h, 1))} ") ' Added a space so you can see the boundaries ascii code boundaries. 
Next 
Dim theResult = wASC.ToString() 

Console.WriteLine(theResult)

你會發現，如果你使用ControlChars.NewLine因爲我有，你有地方空間將被零表示。如果你使用Replace(" ", "")

來源

2017-07-31 11:01:41 Fabulous

如何將字符串

回答

相關問題