随机数字不会附加在文本框vb.net中

Question

Hello this is something new i discovered today i cant append the Other strings when creating random characters string of 20 chars

here is my code

Const llen As Integer = 20 ' total 20 chars

Dim cp() As Integer = {48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90}
Dim ch As Integer
Dim r As System.Random = New System.Random()

Dim rndm() As Char = New Char(llen) {}

For i As Integer = 0 To llen - 1
    ch = cp(r.Next(0, cp.Length))
    rndm(i) = Chr(ch)
Next

Dim randchars As String = rndm

Dim first As String = "CUSTOM1"

Dim second As String = "CUSTOM2"

Textbox1.Text = first & randchars & second

now the output doesnot append second string after those random chars if i take this way

Textbox1.Text = randchars & second & first

output is only randchars not first and second but if i append randchars after both strings it appends what can be the problem ?

Answer 1

好的，这可以通过将String Builder替换为Dim rndm（）来解决，如Char = New Char（llen）{}，然后追加到string builder和最后的stringbuilder.tostring