16-01-15, 04:35 AM
اريد اخذ الكلام الى موجود على الصوره و وضعه فى TEXTBOX جربت هذا الكود
يوجد هذا الخطأ
docMODI = New MODI.Document
مثل على الصوره
![[صورة مرفقة: tumblr_static_abc_logo_200x800.jpg]](http://static.tumblr.com/903133c26c35fba5507fde9dcc177f65/17pwrhj/xWbmjxaux/tumblr_static_abc_logo_200x800.jpg)
كود :
Dim strFile As String = "C:\Users\osama\Desktop\test.jpg"
Dim strText As String = ""
Dim docMODI As MODI.Document
docMODI = New MODI.Document
docMODI.Create(strFile)
docMODI.OCR()
docMODI.Save()
For i As Integer = 0 To (docMODI.Images.Count - 1)
strText = docMODI.Images(i).Layout.Text
Next
File.AppendAllText(TextBox2.Text, strText)
docMODI.Close()
docMODI = Nothingيوجد هذا الخطأ
docMODI = New MODI.Document
مثل على الصوره
![[صورة مرفقة: tumblr_static_abc_logo_200x800.jpg]](http://static.tumblr.com/903133c26c35fba5507fde9dcc177f65/17pwrhj/xWbmjxaux/tumblr_static_abc_logo_200x800.jpg)