Dim temp As Translator
Using sr As IO.StreamReader = New IO.StreamReader("text.dll")
For i As Integer = 0 To 15
trans(i).english = sr.ReadLine
trans(i).arabic = sr.ReadLine
Next
For i As Integer = 1 To 15
For j As Integer = 1 To 16 - i
If trans(j - 1).english > trans(j).english Then
temp = trans(j - 1)
trans(j - 1) = trans(j)
trans(j) = temp
End If
Next
Next
Do While (True)
Dim line As String = sr.ReadLine
If line Is Nothing Then
Exit Do
End If
Dim words As String() = line.Split("|")
Dim word As String
For Each word In words
If word = TextBox1.Text Then
TextBox2.Text = words(+1)
End If
Next
Loop
End Using
danyalempire
0
Newbie Poster
Recommended Answers
Jump to PostOf course it only works on individual words. What did you expect?
Jump to PostYou got to have a translator that knows the gramar of both languages(e.g. Arab and English) That is very, very hard to do.
Jump to PostNot to mention idioms. How do you translate "have a ball" into another language and have it mean the same thing? There's a big difference between knowing the words, knowing the language and knowing the culture. There's an old Dutch (according to my dad) expression, "he landed with his a$$ …
All 12 Replies
danyalempire
0
Newbie Poster
Reverend Jim
4,780
Hi, I'm Jim, one of DaniWeb's moderators.
Moderator
Featured Poster
danyalempire
0
Newbie Poster
ddanbe
2,724
Professional Procrastinator
Featured Poster
danyalempire
0
Newbie Poster
ddanbe
2,724
Professional Procrastinator
Featured Poster
Reverend Jim
4,780
Hi, I'm Jim, one of DaniWeb's moderators.
Moderator
Featured Poster
ddanbe
commented:
LOL :)
+15
ddanbe
2,724
Professional Procrastinator
Featured Poster
danyalempire
0
Newbie Poster
danyalempire
0
Newbie Poster
Reverend Jim
4,780
Hi, I'm Jim, one of DaniWeb's moderators.
Moderator
Featured Poster
ddanbe
2,724
Professional Procrastinator
Featured Poster
Be a part of the DaniWeb community
We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.