23-02-17, 09:16 PM
(23-02-17, 07:00 PM)sendbad100 كتب : السلام عليكم
غير كود الكومند كالتالي
اضف istBox1
والله الموفقPHP كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim reasasa As String
Me.ListBox1.Items.Clear()
For x As Integer = 1 To 10
reasasa = rada(TextBox2.Text)
Me.ListBox1.Items.Add(reasasa)
Next
End Sub
ممكن تغير عدد الكلمات من تغيير الرقم 10 في هذا السطر For x As Integer = 1 To 10
اشكرك وردة
اريد بعد كود حفظ اليوزرات في تيكست
و كود حذف حرف واحد و من اخر اليوزر
مثلا ظهر لي يوزر ammer.net.
يصبح ameer.net