ارجو مساعدة في صناعة برنامج لقراءة النصوص

osamaora كتب:

لقد حاوات صناعة برنامج لقراءة النصوص بالصوت

باللغة العربية ولكني فشلت

ارجو مساعدة سريعا

لاني بحضر لمشروع تخرجي من المعهد

ربما يفيدك هذا

/index.php?showtopic=118912

اذا كنت تريد قراءة text

1- اضغط على ctrl + T

2- ادرج اداة microsoft common dialog و سمها dialog1

3- انشئ تكست

4- انشئ كوماند

كود كوماند:

dialog1.filter "text file|*.txt"
dialog.showopen
if dialog.filename <> "" then
open dialog.filename for input #1
Text1.Text = Input(LOF(1), 1)
close #1
end if

من الافضل وضع خاصية التكست :

mutiline = true

scrollbars = 2

راجع

التعامل مع النصوص

اسف جدا جدا جدا

لم انتبه الى

اقتباس

بالصوت