To aid in our new finding, let us bring in Bram Stockers Dracula "1992", scene with Keanu Reeves and Gary Oldman:
Text with single and double Hard returns:
should leave this room and go to any other parts of the castle
it is owned and holds many bad memories
Be warned
Here is the output, Killer:
should leave this room and go to any other parts of the castle it is owned and holds many bad memories Be warned
Killer, if I did not thank you yet, you're are the best :-)
Boy, I've learned so much here, my professor will be happy to hear about this, should also relay to Steve.
By the way, good buddies, check out Avisto, I do not know why I am telling you this, you guys are experts already; just spreading the good word.
I found out many ways to make our code faster through this site. vbNullString as opposed to " ", vbBinaryCompare , instead of vbTextCompare, vbNewLine, in the place of vbCrLF, and/or its twins.
Barring any unforeseen adventures with parenting or the code I should have more than enough time to complete this project, now 20% done.
In a bit, Killer, and good people of our good, good VB forum. Will post a "dictionary program" here, a language translator really for other Newbies :-)
Dököll
Text with single and double Hard returns:
should leave this room and go to any other parts of the castle
it is owned and holds many bad memories
Be warned
Code:
Dim P As Long Dim s1 As String s1 = Text6(0).Text s1 = Replace(Replace(Replace(s1, vbNewLine & vbNewLine, _ vbNullString), vbNewLine, vbNullString), vbNullString, vbNewLine) Text6(0).Text = s1 P = WordFoundInText(Text3.Text, Text6(0).Text) If P Then Text1.Text = "True" Text2.Text = Text3.Text Else Text6(0).SetFocus Text6(0).SelLength = Len(Text3.Text) Text1.Text = "Darn!" Text2.Text = "What?" End If
should leave this room and go to any other parts of the castle it is owned and holds many bad memories Be warned
Killer, if I did not thank you yet, you're are the best :-)
Boy, I've learned so much here, my professor will be happy to hear about this, should also relay to Steve.
By the way, good buddies, check out Avisto, I do not know why I am telling you this, you guys are experts already; just spreading the good word.
I found out many ways to make our code faster through this site. vbNullString as opposed to " ", vbBinaryCompare , instead of vbTextCompare, vbNewLine, in the place of vbCrLF, and/or its twins.
Barring any unforeseen adventures with parenting or the code I should have more than enough time to complete this project, now 20% done.
In a bit, Killer, and good people of our good, good VB forum. Will post a "dictionary program" here, a language translator really for other Newbies :-)
Dököll
Comment