[undetected71]

وعليكم السلام ورحمة الله وبركاتة

تفضل عملت لك كود آتمنى يكون ها هو المطلوب

PHP كود :

Dim CharArray() As Char = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789".ToCharArray
        TextBox3.Clear()
        Dim Rnd As New Random
        For i = 1 To CInt(TextBox1.Text)
            Dim NewString1 As String = Nothing
            Dim NewString2 As String = Nothing
            For Rndom = 0 To 4
                NewString1 += CharArray(Rnd.Next(0, CharArray.Length))
            Next
            For Rndom2 = 0 To 4
                NewString2 += CharArray(Rnd.Next(0, CharArray.Length))
            Next
            TextBox3.Text += String.Format("User : {0} | Pass : {1}", NewString1, NewString2) & vbNewLine

        Next 


حيث TextBox3 هو النص الجديد الي تحت

و TextBox2 هي القيمة او عدد التكرار

وفقك الله ,