[سلام و محبه]

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

كل عام و حضراتكم بخير
ماهو الكود الذى يقسم الكلمه الى حروف باستخدام vb.net

مثلا كلمه احمد يقسمها الكود الى حروف ( 1 , ح , م , د )

[Taha Okla]

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

كود :

ListBox1.Items.Clear()

Dim str As String = "أحمد"
Dim t() As Char = str.ToCharArray

For Each c As Char In t
   ListBox1.Items.Add(c)
Next

[أبووسم]

منقول من موضوع سابق ساعدوني فيه الاخوان جزاهم الله خير

  TextBox2.Text = TextBox1.Text(0)
       TextBox3.Text = TextBox1.Text(1)
       TextBox4.Text = TextBox1.Text(2)
       TextBox5.Text = TextBox1.Text(3)

http://vb4arb.com/vb/showthread.php?tid=47480

[سلام و محبه]

شكرا اخى Taha Okla

استبدلت ال listbox ب richtextbox
و اضفت فثءفلاخء لكتابه الكلام المطلوب تجزئته
عدلت الكود

كود :

Public Class Form1

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       RichTextBox1.Text = ""

       Dim str As String = TextBox1.Text

       Dim t() As Char = str.ToCharArray

       For Each c As Char In t
           RichTextBox1.Text = c
       Next
   End Sub
End Class

لكن يكتب آخر حرف فقط
ما الحل؟

[Taha Okla]

كود :

For Each c As Char In t
    RichTextBox1.Text &= c & vbNewLine
Next

[سلام و محبه]

شكرا اخى Taha Okla استبلت ال button ب timer و ضبط الخاصيه enabeled الى true لينفذ الاجراء بمجرد الكتابه فى ال textbox و تم الحمد لله
اريد عمل برنامج يحسب الوقت المستغرق لكتابه الكلمه و يحسب عدد الكلمات مثل المواقع التى تحسب سرعه الكتابه على الكيبورد